Bug 30952: Fix the 'keep_text' feature of the search bar

[koha-ffzg.git] / cataloguing / z3950_auth_search.pl

diff --git a/cataloguing/z3950_auth_search.pl b/cataloguing/z3950_auth_search.pl
index e97c47d..da93dac 100755 (executable)
--- a/cataloguing/z3950_auth_search.pl
+++ b/cataloguing/z3950_auth_search.pl
@@ -20,11 +20,10 @@ use Modern::Perl;
 
 use CGI qw / -utf8 /;
 
-use C4::Auth;
-use C4::Output;
+use C4::Auth qw( get_template_and_user );
+use C4::Output qw( output_html_with_http_headers );
 use C4::Context;
-use C4::Breeding;
-use C4::Koha;
+use C4::Breeding qw( Z3950Search Z3950SearchAuth );
 
 my $input        = CGI->new;
 my $dbh          = C4::Context->dbh;