From cac81c5c401813e609a9b3345eec91a570071fab Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@luxion>
Date: Thu, 10 Nov 2005 20:19:29 +0000
Subject: =?UTF-8?q?aggiunta=20la=20funzionalit=C3=A0=20di=20ricerca,=20e?=
 =?UTF-8?q?=20"finiti"=20gli=20stili?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 lib/Bookmarks/C/Main.pm | 26 +++++++++++++++++++++-----
 1 file changed, 21 insertions(+), 5 deletions(-)

(limited to 'lib/Bookmarks/C')

diff --git a/lib/Bookmarks/C/Main.pm b/lib/Bookmarks/C/Main.pm
index d957c5d..83edfa9 100644
--- a/lib/Bookmarks/C/Main.pm
+++ b/lib/Bookmarks/C/Main.pm
@@ -76,7 +76,7 @@ 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->access_count(($link->access_count()||0)+1);
     $link->last_access_date(time());
     $link->update();
 
@@ -177,8 +177,17 @@ sub complete_tag : Global {
     $c->res->body($c->prototype->auto_complete_result(\@tags));
 }
 
-=back
+sub search : Global {
+    my ( $self, $c ) = @_;
+
+    my $query=$c->req->param('q');
+    my @tags=split /\s+/,$c->req->param('tags');
+
+    my @links=Bookmarks::M::DB::Links->search_complex($query,@tags);
 
+    $c->stash->{links}=[ @links ];
+    $c->stash->{template}='results';
+}
 
 =head1 AUTHOR
 
@@ -207,10 +216,17 @@ sub stylesheet {
     )->as_string();
 }
 
-sub tag_info {
-    my ($self, $tag)=@_;
+sub tags {
+    my ($self)=@_;
+    return URI->new(
+        $self->{base} . 'tags'
+    )->as_string();
+}
+
+sub search {
+    my ($self)=@_;
     return URI->new(
-        $self->{base} . 'tag-info/' . $tag->name()
+        $self->{base} . 'search'
     )->as_string();
 }
 
-- 
cgit v1.2.3