diff options
Diffstat (limited to 'lib/Bookmarks/C/Main.pm')
-rw-r--r-- | lib/Bookmarks/C/Main.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lib/Bookmarks/C/Main.pm b/lib/Bookmarks/C/Main.pm index b25ef9a..a07c594 100644 --- a/lib/Bookmarks/C/Main.pm +++ b/lib/Bookmarks/C/Main.pm @@ -60,6 +60,17 @@ sub icon : Global { } } +sub jump : Global { + my ( $self, $c ) = @_; + + my $link=Bookmarks::M::DB::Links->retrieve($c->req->param('link')); + $link->access_count($link->access_count()+1); + $link->update(); + + $c->res->status(302); + $c->res->location($link->url()); +} + =back |