[Module-build-checkins] Module-Build/lib/Module/Build Compat.pm,1.65,1.66
Status: Beta
Brought to you by:
kwilliams
|
From: Ken W. <kwi...@us...> - 2005-09-10 03:53:36
|
Update of /cvsroot/module-build/Module-Build/lib/Module/Build In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15477/lib/Module/Build Modified Files: Compat.pm Log Message: Skip empty strings as args Index: Compat.pm =================================================================== RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Compat.pm,v retrieving revision 1.65 retrieving revision 1.66 diff -u -d -r1.65 -r1.66 --- Compat.pm 10 Sep 2005 03:53:10 -0000 1.65 +++ Compat.pm 10 Sep 2005 03:53:29 -0000 1.66 @@ -140,6 +140,8 @@ shift; my @out; foreach my $arg (@_) { + next if $arg eq ''; + my ($key, $val) = ($arg =~ /^(\w+)=(.+)/ ? ($1, $2) : die "Malformed argument '$arg'"); |