/[webpac2]/Webpacus/lib/Webpacus/Controller/Results.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 /Webpacus/lib/Webpacus/Controller/Results.pm

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

revision 117 by dpavlin, Wed Nov 23 21:52:25 2005 UTC revision 118 by dpavlin, Wed Nov 23 21:52:30 2005 UTC
# Line 43  use Data::Dumper; Line 43  use Data::Dumper;
43    
44          my $v = $params->{$f} || next;          my $v = $params->{$f} || next;
45    
         push @attr, "$f ISTRINC $v";  
46          $q .= "$v ";          $q .= "$v ";
47    
48            next if ($f eq 'all');  # don't add_attr for magic field all
49    
50            if ($v !~ /\s/) {
51                    push @attr, "$f ISTRINC $v";
52            } else {
53                    map { push @attr, "$f ISTRINC $_"; } split(/\s+/, $v);
54            }
55      }      }
56    
57      $c->stash->{html_results} = sub {      $c->stash->{html_results} = sub {
58          my $res = $webpac->search( $q, $params->{'_template'}, @attr );          my $res = $webpac->search( $q, $params->{'_template'}, \@attr );
59  #       $log->debug("controller got " . ( $#{$res} + 1 ) . " results for '$q' " . Dumper( $res ));  #       $log->debug("controller got " . ( $#{$res} + 1 ) . " results for '$q' " . Dumper( $res ));
60          return $res;          return $res;
61      };      };
Legend:
Removed from v.117  
changed lines
  Added in v.118
  ViewVC Help
Powered by ViewVC 1.1.26