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

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

revision 135 by dpavlin, Thu Nov 24 22:29:29 2005 UTC revision 143 by dpavlin, Fri Nov 25 01:24:31 2005 UTC
# Line 36  Configuration for hyperestraier in C<con Line 36  Configuration for hyperestraier in C<con
36    url: 'http://localhost:1978/node/webpac2'    url: 'http://localhost:1978/node/webpac2'
37    user: 'admin'    user: 'admin'
38    passwd: 'admin'    passwd: 'admin'
39      hits_on_page: 100
40    
41   webpac:   webpac:
42    db_path: '/data/webpac2/db'    db_path: '/data/webpac2/db'
# Line 60  sub new { Line 61  sub new {
61          my $est_cfg = $c->config->{hyperestraier};          my $est_cfg = $c->config->{hyperestraier};
62          $est_cfg->{'log'} = $log;          $est_cfg->{'log'} = $log;
63    
64            $est_cfg->{encoding} = $est_cfg->{catalyst_encoding};
65    
66          $log->debug("using config:" . Dumper($est_cfg) );          $log->debug("using config:" . Dumper($est_cfg) );
67    
68          $self->{est} = new WebPAC::Search::Estraier( %{ $est_cfg } );          $self->{est} = new WebPAC::Search::Estraier( %{ $est_cfg } );
# Line 137  sub search { Line 140  sub search {
140          my @results = $self->{est}->search(          my @results = $self->{est}->search(
141                  phrase => $query,                  phrase => $query,
142                  get_attr => [ '@uri' ],                  get_attr => [ '@uri' ],
143                  max => 100,                  max => $self->{est}->{hits_on_page} || 30,
144                  add_attr => $add_attr,                  add_attr => $add_attr,
145          );          );
146    
Legend:
Removed from v.135  
changed lines
  Added in v.143
  ViewVC Help
Powered by ViewVC 1.1.26