X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fgetopts.pl;h=e30820a3189d1c5a26ab0e69de44bddb9d8e24ee;hb=584420f022db57225e9644b9c6668ff9f567984a;hp=4a50b8f6c22489fcf9e6378ef87a95ef9d7b2afe;hpb=22d4bb9ccb8701e68f9243547d7e3a3c55f70908;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/getopts.pl b/lib/getopts.pl
index 4a50b8f..e30820a 100644
--- a/lib/getopts.pl
+++ b/lib/getopts.pl
@@ -31,7 +31,7 @@ sub Getopts {
 				}
 				eval "
 				push(\@opt_$first, \$rest);
-				if(\$opt_$first eq '') {
+				if (!defined \$opt_$first or \$opt_$first eq '') {
 					\$opt_$first = \$rest;
 				}
 				else {