[Gnucash-changes] r11842 - meta/hooks - stupid arg parsing.

Joshua Sled jsled at cvs.gnucash.org
Sat Nov 5 12:40:48 EST 2005


Author: jsled
Date: 2005-11-05 12:40:48 -0500 (Sat, 05 Nov 2005)
New Revision: 11842

Modified:
   meta/hooks/commit-email.pl
Log:
stupid arg parsing.


Modified: meta/hooks/commit-email.pl
===================================================================
--- meta/hooks/commit-email.pl	2005-11-05 17:32:51 UTC (rev 11841)
+++ meta/hooks/commit-email.pl	2005-11-05 17:40:48 UTC (rev 11842)
@@ -126,11 +126,14 @@
             die "$0: command line option `$arg' is not recognized.\n";
           }
 
-        unless ($arg eq '-n' or @ARGV)
+        if (not ($arg eq '-n' or @ARGV))
           {
             die "$0: command line option `$arg' is missing a value.\n";
           }
-        my $value = shift @ARGV;
+        else
+        {
+            my $value = shift @ARGV;
+        }
 
         if ($hash_key)
           {



More information about the gnucash-changes mailing list