- query => $query,
- resultsloop => \@results,
- startfrom=> $startfrom,
- displaynext=> $displaynext,
- displayprev=> $displayprev,
- resultsperpage => $resultsperpage,
- startfromnext => $startfrom+1,
- startfromprev => $startfrom-1,
- total=>$total,
- from=>$from,
- to=>$to,
- numbers=>\@numbers,
- );
-} # end of if ($op eq "do_search")
- else {
- ($template, $loggedinuser, $cookie)
- = get_template_and_user({template_name => "serials/subscription-bib-search.tmpl",
- query => $input,
- type => "intranet",
- authnotrequired => 0,
- flagsrequired => {catalogue => 1, serials=>1},
- debug => 1,
- });
-
- my %itemtypes = GetItemTypes();
- my @values = values %itemtypes;
- my $CGIitemtype=CGI::scrolling_list(
- -name => 'value',
- -values => \@values,
- -labels => \%itemtypes,
- -size => 1,
- -multiple => 0
+ query => $query,
+ resultsloop => \@results,
+ startfrom => $startfrom,
+ displaynext => $displaynext,
+ displayprev => $displayprev,
+ resultsperpage => $resultsperpage,
+ startfromnext => $startfrom + 1,
+ startfromprev => $startfrom - 1,
+ total => $total_hits,
+ from => $from,
+ to => $to,
+ numbers => \@numbers,
+ );
+} # end of if ($op eq "do_search" & $query)
+else {
+ ( $template, $loggedinuser, $cookie ) = get_template_and_user(
+ {
+ template_name => "serials/subscription-bib-search.tt",
+ query => $input,
+ type => "intranet",
+ flagsrequired => { catalogue => 1, serials => '*' },
+ }