Lines 43-48
my $srchany = $input->param('srchany');
Link Here
|
43 |
my $op = $input->param('op')||''; |
43 |
my $op = $input->param('op')||''; |
44 |
my $page = $input->param('current_page') || 1; |
44 |
my $page = $input->param('current_page') || 1; |
45 |
$page = $input->param('goto_page') if $input->param('changepage_goto'); |
45 |
$page = $input->param('goto_page') if $input->param('changepage_goto'); |
|
|
46 |
my $controlnumber = $input->param('controlnumber'); |
46 |
|
47 |
|
47 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user({ |
48 |
my ( $template, $loggedinuser, $cookie ) = get_template_and_user({ |
48 |
template_name => "cataloguing/z3950_auth_search.tt", |
49 |
template_name => "cataloguing/z3950_auth_search.tt", |
Lines 63-68
$template->param(
Link Here
|
63 |
subjectsubdiv => $subjectsubdiv, |
64 |
subjectsubdiv => $subjectsubdiv, |
64 |
srchany => $srchany, |
65 |
srchany => $srchany, |
65 |
authid => $authid, |
66 |
authid => $authid, |
|
|
67 |
controlnumber => $controlnumber, |
66 |
); |
68 |
); |
67 |
|
69 |
|
68 |
if ( $op ne "do_search" ) { |
70 |
if ( $op ne "do_search" ) { |
Lines 100-105
my $pars= {
Link Here
|
100 |
subjectsubdiv => $subjectsubdiv, |
102 |
subjectsubdiv => $subjectsubdiv, |
101 |
srchany => $srchany, |
103 |
srchany => $srchany, |
102 |
authid => $authid, |
104 |
authid => $authid, |
|
|
105 |
controlnumber => $controlnumber, |
103 |
}; |
106 |
}; |
104 |
Z3950SearchAuth($pars, $template); |
107 |
Z3950SearchAuth($pars, $template); |
105 |
output_html_with_http_headers $input, $cookie, $template->output; |
108 |
output_html_with_http_headers $input, $cookie, $template->output; |