From 31917a6c6ef79d6933d9484df4c0603d9df891b6 Mon Sep 17 00:00:00 2001 From: Ivan Brown 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