From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 19 Jun 2007 08:09:09 +0000 (+0000)
Subject: Nur Dateien nach $locale->text() durchsuchen, deren Name mit .pl endet.
X-Git-Tag: release-2.4.3^2~100
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=e8a427334ec00090b77b6cf62d1a7a21038d5cee;p=kivitendo-erp.git

Nur Dateien nach $locale->text() durchsuchen, deren Name mit .pl endet.
---

diff --git a/locale/de/locales.pl b/locale/de/locales.pl
index f12001ce0..c568467f2 100755
--- a/locale/de/locales.pl
+++ b/locale/de/locales.pl
@@ -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;