From 31917a6c6ef79d6933d9484df4c0603d9df891b6 Mon Sep 17 00:00:00 2001
From: Ivan Brown <I.Brown@littleover.derby.sch.uk>
Date: Tue, 25 Sep 2012 15:57:43 +0100
Subject: [PATCH] Bug 7643 - Can't upload and import zipped file of patron images

Fixed problem with re-declaration of $filesuffix
---
 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 bfb233e..4507fa1 100755
--- a/tools/picture-upload.pl
+++ b/tools/picture-upload.pl
@@ -80,7 +80,7 @@ if ( ($op eq 'Upload') && $uploadfile ) {       # Case is important in these ope
     $debug and warn "dirname = $dirname";
     my $filesuffix;
     if ( $uploadfilename =~ m/(\..+)$/i ) {
-        my $filesuffix = $1;
+        $filesuffix = $1;
     }
     ( $tfh, $tempfile ) = File::Temp::tempfile( SUFFIX => $filesuffix, UNLINK => 1 );
     $debug and warn "tempfile = $tempfile";
-- 
1.7.11.msysgit.1