use C4::Debug instead of checking DEBUG env var directly

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/circ/billing.pl b/circ/billing.pl
index 346084a..a1586a7 100755 (executable)
--- a/circ/billing.pl
+++ b/circ/billing.pl
@@ -24,14 +24,9 @@ use C4::Output;
 use CGI;
 use C4::Auth;
 use C4::Dates qw/format_date format_date_in_iso/;
+use C4::Debug;
 use Date::Calc qw/Today Add_Delta_YM/;
 
-use vars qw($debug);
-
-BEGIN {
-    $debug = $ENV{DEBUG} || 0;
-}
-
 my $input = new CGI;
 my $order = $input->param('order');
 my $startdate=$input->param('from');

diff --git a/circ/pendingreserves.pl b/circ/pendingreserves.pl
index 7400638..b9fa6d9 100755 (executable)
--- a/circ/pendingreserves.pl
+++ b/circ/pendingreserves.pl
@@ -29,14 +29,9 @@ use C4::Output;
 use CGI;
 use C4::Auth;
 use C4::Dates qw/format_date format_date_in_iso/;
+use C4::Debug;
 use Date::Calc qw/Today Add_Delta_YMD/;
 
-use vars qw($debug);
-
-BEGIN {
-    $debug = $ENV{DEBUG} || 0;
-}
-
 my $input = new CGI;
 my $order = $input->param('order');
 my $startdate=$input->param('from');

diff --git a/circ/reserveratios.pl b/circ/reserveratios.pl
index d7fecbe..8523a1e 100755 (executable)
--- a/circ/reserveratios.pl
+++ b/circ/reserveratios.pl
@@ -24,14 +24,9 @@ use C4::Output;
 use CGI;
 use C4::Auth;
 use C4::Dates qw/format_date format_date_in_iso/;
+use C4::Debug;
 use Date::Calc qw/Today Add_Delta_YM/;
 
-use vars qw($debug);
-
-BEGIN {
-    $debug = $ENV{DEBUG} || 0;
-}
-
 my $input = new CGI;
 my $order = $input->param('order');
 my $startdate=$input->param('from');