43 |
$self->config($config); |
$self->config($config); |
44 |
|
|
45 |
my $log = $c->log; |
my $log = $c->log; |
46 |
|
$self->{log} = $log; |
47 |
|
|
48 |
my $est_cfg = $c->config->{hyperestraier}; |
my $est_cfg = $c->config->{hyperestraier}; |
49 |
$est_cfg->{'log'} = $log; |
$est_cfg->{'log'} = $log; |
52 |
|
|
53 |
$self->{est} = new WebPAC::Search::Estraier( %{ $est_cfg } ); |
$self->{est} = new WebPAC::Search::Estraier( %{ $est_cfg } ); |
54 |
|
|
|
# $c->stash->{est}->search( |
|
|
# query => $c->req->params->{Title}, |
|
|
# max => 100, |
|
|
# ); |
|
|
|
|
55 |
return $self; |
return $self; |
56 |
|
|
57 |
} |
} |
59 |
sub search { |
sub search { |
60 |
my ( $self, $query ) = @_; |
my ( $self, $query ) = @_; |
61 |
|
|
62 |
|
$self->{log}->debug("search got query: $query<--"); |
63 |
|
|
64 |
my @results = $self->{est}->search( |
my @results = $self->{est}->search( |
65 |
query => $query, |
query => $query, |
66 |
attr => [ '@uri' ], |
attr => [ '@uri' ], |
67 |
max => 100, |
max => 100, |
68 |
); |
); |
69 |
|
|
70 |
return \@results; |
return @results; |
71 |
} |
} |
72 |
|
|
73 |
|
|