X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=admin%2Fmatching-rules.pl;h=b8827126f718ac83cb029c5f3e5f5ee8051755f5;hb=cce48fc7d41ee9a0a38ae6b537830de886f86fb4;hp=eb308dde4aa691636ebf051b0d611e40598d25b7;hpb=96cc447045f3f1d3702a3c69b36f596d88f38eda;p=koha-ffzg.git diff --git a/admin/matching-rules.pl b/admin/matching-rules.pl index eb308dde4a..b8827126f7 100755 --- a/admin/matching-rules.pl +++ b/admin/matching-rules.pl @@ -1,4 +1,4 @@ -#! /usr/bin/perl +#!/usr/bin/perl # # Copyright 2007 LibLime # @@ -21,10 +21,9 @@ use Modern::Perl; use CGI qw ( -utf8 ); -use C4::Auth; +use C4::Auth qw( get_template_and_user ); use C4::Context; -use C4::Output; -use C4::Koha; +use C4::Output qw( output_html_with_http_headers ); use C4::Matcher qw/valid_normalization_routines/; my $script_name = "/cgi-bin/koha/admin/matching-rules.pl"; @@ -38,7 +37,6 @@ my ($template, $loggedinuser, $cookie) query => $input, type => "intranet", flagsrequired => { parameters => 'manage_matching_rules' }, - debug => 1, }); $template->param(script_name => $script_name);