[prev in list] [next in list] [prev in thread] [next in thread] 

List:       gpg4win-commits
Subject:    [Gpg4win-commits] r722 - trunk/src
From:       scm-commit () wald ! intevation ! org
Date:       2008-02-26 15:12:53
Message-ID: 20080226151253.DF4E840557 () pyrosoma ! intevation ! org
[Download RAW message or body]

Author: marcus
Date: 2008-02-26 16:12:53 +0100 (Tue, 26 Feb 2008)
New Revision: 722

Modified:
   trunk/src/pkg-to-nsi.pl
Log:
Small fixes.


Modified: trunk/src/pkg-to-nsi.pl
===================================================================
--- trunk/src/pkg-to-nsi.pl	2008-02-26 14:34:29 UTC (rev 721)
+++ trunk/src/pkg-to-nsi.pl	2008-02-26 15:12:53 UTC (rev 722)
@@ -43,7 +43,7 @@
 $::op = '--inst';
 
 # Filter expressions.
-@::filter;
+@::filter = ();
 
 while ($ARGV[0] =~ m,^-,)
 {
@@ -95,7 +95,7 @@
 
 if ($::op eq '--inst')
 {
-    my $cdir;
+    my $cdir = "";
 
     foreach my $file (@::files)
     {
@@ -169,7 +169,7 @@
 	
 	# Delete file.
 	$file =~ m,(?:(.*)/)?([^/]+),;
-	my $dir = $1;
+	$dir = $1;
 	$dir_seen{$dir}++;
 	do
 	{

_______________________________________________
Gpg4win-commits mailing list
Gpg4win-commits@wald.intevation.org
http://lists.wald.intevation.org/mailman/listinfo/gpg4win-commits
[prev in list] [next in list] [prev in thread] [next in thread]