diff options
| author | dakkar <dakkar@luxion> | 2005-10-19 19:34:59 +0000 |
|---|---|---|
| committer | dakkar <dakkar@luxion> | 2005-10-19 19:34:59 +0000 |
| commit | 45d560a6dc56462a4338e90a8174a02a0a00302d (patch) | |
| tree | c92f6831288bed4074674722eec4548566b399c5 /lib/Bookmarks/C/Main.pm | |
| parent | fatto il db (diff) | |
| download | Bookmarks-45d560a6dc56462a4338e90a8174a02a0a00302d.tar.gz Bookmarks-45d560a6dc56462a4338e90a8174a02a0a00302d.tar.bz2 Bookmarks-45d560a6dc56462a4338e90a8174a02a0a00302d.zip | |
relazioni, e inizio lavori
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 |