From: Stephan Köhler <s.koehler@linet-services.de>
Date: Thu, 6 Apr 2006 07:54:17 +0000 (+0000)
Subject: Bugfix 347 - locales.pl wertetet falsche Dateien ( *.pl~) aus
X-Git-Tag: release-2.4.0^2~289
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=c7867be75c809e15b7f36f412422ac59a789f060;p=kivitendo-erp.git

Bugfix 347 - locales.pl wertetet falsche Dateien ( *.pl~) aus
---

diff --git a/locale/de/locales.pl b/locale/de/locales.pl
index ac2494758..1767b9653 100755
--- a/locale/de/locales.pl
+++ b/locale/de/locales.pl
@@ -15,7 +15,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;