gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

bug 2505: enable warnings for admin/authorized_values.pl 

Signed-off-by: Galen Charlton <galen.charlton@liblime.com>
This commit is contained in:
Galen Charlton 2009-01-06 19:43:35 -06:00 committed by Henri-Damien LAURENT
parent 16e39c65f1
commit b01eca70a0
1 changed files with 8 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
admin/authorised_values.pl
View File

@ -18,7 +18,8 @@
# Suite 330, Boston, MA 02111-1307 USA
use strict;
# use warnings; #FIXME
use warnings;
use CGI;
use C4::Auth;
use C4::Context;
@ -43,22 +44,23 @@ sub AuthorizedValuesForCategory ($) {
my $input = new CGI;
my $id = $input->param('id');
my $offset = $input->param('offset');
my $offset = $input->param('offset') || 0;
my $searchfield = $input->param('searchfield');
$searchfield = '' unless defined $searchfield;
$searchfield=~ s/\,//g;
my $script_name = "/cgi-bin/koha/admin/authorised_values.pl";
my $dbh = C4::Context->dbh;
my ($template, $borrowernumber, $cookie)= get_template_and_user({
template_name => "admin/authorised_values.tmpl",
template_name => "admin/authorised_values.tmpl",
authnotrequired => 0,
flagsrequired => {parameters => 1},
flagsrequired => {parameters => 1},
query => $input,
type => "intranet",
type => "intranet",
debug => 1,
});
my $pagesize = 20;
my $op = $input->param('op');
my $op = $input->param('op') || '';
$template->param( script_name => $script_name,
($op||'else') => 1 );