/[SQLSession]/trunk/lib/SQLSession/Dispatcher.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/SQLSession/Dispatcher.pm

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

revision 78 by dpavlin, Mon Jan 29 20:11:20 2007 UTC revision 79 by dpavlin, Mon Jan 29 20:46:20 2007 UTC
# Line 69  on '/' => run { Line 69  on '/' => run {
69          redirect '/list';          redirect '/list';
70  };  };
71    
72    on qr{^/feed/(atom|rss|rss2)}, run {
73            my $type = 'RSS';
74            $type = 'Atom' if ($1 eq 'atom');
75            set type => $type;
76            show('/feed');
77    };
78    
79  1;  1;
Legend:
Removed from v.78  
changed lines
  Added in v.79
  ViewVC Help
Powered by ViewVC 1.1.26