X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=tools%2Fdebianqueued-0.9%2Fdebianqueued;h=af8d70daef1a1cb14e497e350bad386234380937;hb=1c35448b880358d020e81339657e3435fdda9434;hp=f9974366950bf075937946fed73117c0c15ad55b;hpb=40908ec831933a46339b740e0371f4fccbf7adb9;p=dak.git

diff --git a/tools/debianqueued-0.9/debianqueued b/tools/debianqueued-0.9/debianqueued
index f9974366..af8d70da 100755
--- a/tools/debianqueued-0.9/debianqueued
+++ b/tools/debianqueued-0.9/debianqueued
@@ -23,6 +23,8 @@ use Socket qw( PF_INET AF_INET SOCK_STREAM );
 use Config;
 use Sys::Hostname;
 
+setlocale(&POSIX::LC_ALL, "C");
+
 # ---------------------------------------------------------------------------
 #								configuration
 # ---------------------------------------------------------------------------
@@ -1209,7 +1211,9 @@ outer_loop: while (<COMMANDS>) {
           $selecteddelayed = $1;
           s,^DELAYED/[0-9]+-day/,,;
         }
-        if ( $origword eq "--searchdirs" ) {
+        if (m,(^|/)\*,) {
+          msg("mail,log", "$_: filename component cannot start with a wildcard\n");
+        } elsif ( $origword eq "--searchdirs" ) {
           $selecteddelayed = -2;
         } elsif (m,/,) {
           msg(