diff options
Diffstat (limited to 'lib/Bookmarks/C/Main.pm')
-rw-r--r-- | lib/Bookmarks/C/Main.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/Bookmarks/C/Main.pm b/lib/Bookmarks/C/Main.pm index 63744c1..7182a9e 100644 --- a/lib/Bookmarks/C/Main.pm +++ b/lib/Bookmarks/C/Main.pm @@ -25,7 +25,13 @@ Catalyst component. sub default : Private { my ( $self, $c ) = @_; - $c->res->output('Congratulations, Bookmarks::C::Main is on Catalyst!'); + $c->res->redirect($c->req->base,'/tags'); +} + +sub tags : Global { + my ( $self, $c ) = @_; + $c->stash->{template}='tags'; + $c->stash->{tags}=[Bookmarks::M::DB::Tags->get_all_tags_by_popularity()]; } =back |