78 |
|
|
79 |
$c->forward('filter_database'); |
$c->forward('filter_database'); |
80 |
|
|
81 |
my @hits = $webpac->search( |
my $hits = $webpac->search( |
82 |
phrase => $q, |
phrase => $q, |
83 |
add_attr => $c->stash->{attr}, |
add_attr => $c->stash->{attr}, |
84 |
get_attr => [ $show ], |
get_attr => [ $show ], |
88 |
my $used; |
my $used; |
89 |
my @suggestions; |
my @suggestions; |
90 |
|
|
91 |
foreach my $res (@hits) { |
foreach my $res (@{$hits}) { |
92 |
my $v = $res->{ $show } || next; |
my $v = $res->{ $show } || next; |
93 |
next if ($used->{ $v }++); |
next if ($used->{ $v }++); |
94 |
push @suggestions, $v; |
push @suggestions, $v; |