]> err.no Git - dak/commitdiff
Avoid possible undefined variable complaint with length function.
authorStephen Gran <steve@lobefin.net>
Sat, 10 May 2008 14:37:50 +0000 (15:37 +0100)
committerStephen Gran <steve@lobefin.net>
Sat, 10 May 2008 14:37:50 +0000 (15:37 +0100)
tools/debianqueued-0.9/debianqueued

index 97359b0f8b540099e9dd546cb28a0550d62fee23..6d971826df6ccb3ddcc7373ca937fdfcb4c42479 100755 (executable)
@@ -2124,7 +2124,7 @@ sub send_mail($$$) {
        my $subject = shift;
        my $text = shift;
 
-        my $package = join(' ', keys %main::packages);
+        my $package = keys %main::packages ? join(' ', keys %main::packages) : "";
 
         use Email::Send;