Backupdateien ignorieren.
authorMoritz Bunkus <m.bunkus@linet-services.de>
Thu, 1 Feb 2007 12:59:26 +0000 (12:59 +0000)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Thu, 1 Feb 2007 12:59:26 +0000 (12:59 +0000)
locale/de/locales.pl

index 6415370..725a9e5 100755 (executable)
@@ -25,7 +25,7 @@ foreach $item (@ARGV) {
 }
 
 opendir DIR, "$bindir" or die "$!";
-@progfiles = grep { /\.pl/; !/(_|^\.)/ } readdir DIR;
+@progfiles = grep { /\.pl$/; !/(_|^\.)/ } readdir DIR;
 seekdir DIR, 0;
 @customfiles = grep /_/, readdir DIR;
 closedir DIR;