From af0fad6a4c7f3d545f0260d2ed6e61f364206a29 Mon Sep 17 00:00:00 2001 From: Joe Atzberger Date: Tue, 23 Sep 2008 12:01:48 -0500 Subject: [PATCH] Convert to C4::Debug, comment out unused Data::Dumper. Signed-off-by: Galen Charlton --- tools/viewlog.pl | 13 +++++-------- 1 file changed, 5 insertions(+), 8 deletions(-) diff --git a/tools/viewlog.pl b/tools/viewlog.pl index 52062143b8..3c65b6a9a4 100755 --- a/tools/viewlog.pl +++ b/tools/viewlog.pl @@ -28,23 +28,20 @@ use C4::Output; use C4::Log; use C4::Items; use C4::Branch; -use Data::Dumper; +use C4::Debug; +# use Data::Dumper; -use vars qw($debug); - -BEGIN { - $debug = $ENV{DEBUG} || 0; -} +use vars qw($debug $cgi_debug); =head1 viewlog.pl -plugin that shows a stats on borrowers +plugin that shows stats =cut my $input = new CGI; -$debug or $debug = $input->param('debug') || 0; +$debug or $debug = $cgi_debug; my $do_it = $input->param('do_it'); my $module = $input->param("module"); my $user = $input->param("user"); -- 2.39.5