chiark / gitweb /
Dgit.pm: Call `confess' when shellquote gets an undef arg
[dgit.git] / Debian / Dgit.pm
index 5e0bbd5..ba1c288 100644 (file)
@@ -137,6 +137,7 @@ sub messagequote ($) {
 sub shellquote {
     my @out;
     local $_;
+    defined or confess 'internal error' foreach @_;
     foreach my $a (@_) {
        $_ = $a;
        if (!length || m{[^-=_./:0-9a-z]}i) {