/[Grep]/lib/Grep/Search.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 /lib/Grep/Search.pm

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

revision 191 by dpavlin, Fri May 23 21:05:42 2008 UTC revision 192 by dpavlin, Fri May 23 21:52:06 2008 UTC
# Line 4  use warnings; Line 4  use warnings;
4    
5  use base qw(  use base qw(
6          Class::Accessor          Class::Accessor
7          Grep::Search::Estraier          Grep::Search::KinoSearch
8  );  );
9  =for alternative  =for alternative
10          Grep::Search::Estraier          Grep::Search::Estraier
# Line 128  sub collection { Line 128  sub collection {
128    
129          my $q = shift or die "no q?";          my $q = shift or die "no q?";
130    
131          my $full_q = "($q)";          my $next_hit = $self->search( $q );
   
         my $uid = Jifty->web->current_user->id;  
         $full_q .= ' AND _owner_id:' . $uid if (defined $uid);  
   
         $self->log->debug("searching for '$q' using $full_q");  
   
         my $next_hit = $self->search( $full_q );  
132    
133          $self->log->debug("found ", $self->hits, " results");          $self->log->debug("found ", $self->hits, " results");
134    
Legend:
Removed from v.191  
changed lines
  Added in v.192
  ViewVC Help
Powered by ViewVC 1.1.26