]> git.decadent.org.uk Git - dak.git/blobdiff - tools/debianqueued-0.9/debianqueued
marge from master
[dak.git] / tools / debianqueued-0.9 / debianqueued
index f9974366950bf075937946fed73117c0c15ad55b..af8d70daef1a1cb14e497e350bad386234380937 100755 (executable)
@@ -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(