From a0b51ee25fb9d4b93a5f68827610538f42a1a858 Mon Sep 17 00:00:00 2001
From: Chris Nighswonger <cnighswonger@foundations.edu>
Date: Thu, 31 Jan 2008 18:27:02 -0600
Subject: [PATCH] Correcting DEBUG var

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 tools/picture-upload.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/picture-upload.pl b/tools/picture-upload.pl
index 2203f5da7d..598ee26fd3 100755
--- a/tools/picture-upload.pl
+++ b/tools/picture-upload.pl
@@ -7,7 +7,7 @@ use C4::Context;
 use C4::Auth;
 use C4::Output;
 
-my $DEBUG = 1;
+my $DEBUG = ($ENV{DEBUG}) ? 1 : 0;
 
 #my $destdir = "/usr/local/koha/intranet/htdocs/intranet-tmpl/images/patronpictures";
 #my $uploadfile = shift @ARGV;
-- 
2.39.5