X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=Debian%2FDgit.pm;h=f68ebd228366676e97e4921bcffd6446bf6345c9;hb=f82da50bcda81c6b3751e172dc943d4c348f4f72;hp=e2a503d73eee9e5ae89f12b32d27e659963e426a;hpb=41d1bd6a6c194f11f906e1140861e976fac3f4e0;p=dgit.git diff --git a/Debian/Dgit.pm b/Debian/Dgit.pm index e2a503d7..f68ebd22 100644 --- a/Debian/Dgit.pm +++ b/Debian/Dgit.pm @@ -94,7 +94,7 @@ sub enabledebug () { sub enabledebuglevel ($) { die if $debuglevel; - ($debuglevel) = @_ + 0; + $debuglevel = $_[0] + 0; enabledebug(); } @@ -107,7 +107,7 @@ sub shellquote { local $_; foreach my $a (@_) { $_ = $a; - if (m{[^-=_./0-9a-z]}i) { + if (!length || m{[^-=_./0-9a-z]}i) { s{['\\]}{'\\$&'}g; push @out, "'$_'"; } else {