/[Frey]/trunk/lib/Frey/View.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/Frey/View.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 40 by dpavlin, Sun Jun 29 20:52:33 2008 UTC revision 41 by dpavlin, Mon Jun 30 20:02:14 2008 UTC
# Line 27  template 'status' => sub { Line 27  template 'status' => sub {
27    
28  sub method_link {  sub method_link {
29          my ( $pkg,$method ) = @_;          my ( $pkg,$method ) = @_;
30            my $url = "/$pkg/$method";
31            $url = $method if $method =~ m!^/!;
32          a {          a {
33                  { href is "/$pkg/$method" }                  { href is $url }
34                  outs $method                  outs $method
35          }          }
36  }  }
Legend:
Removed from v.40  
changed lines
  Added in v.41
  ViewVC Help
Powered by ViewVC 1.1.26