From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 16 May 2007 14:12:10 +0000 (+0000)
Subject: ";" nicht als Kommentarzeichen ansehen.
X-Git-Tag: release-2.4.3^2~297
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/a52a1004576857c1c1539b241aae1adab0b242b0?ds=inline

";" nicht als Kommentarzeichen ansehen.
---

diff --git a/SL/Inifile.pm b/SL/Inifile.pm
index f7fe27b3c..aadec0af1 100644
--- a/SL/Inifile.pm
+++ b/SL/Inifile.pm
@@ -52,12 +52,10 @@ sub new {
   open FH, "$file" or Form->error("$file : $!");
 
   while (<FH>) {
-    next if m/^(#|;|\s)/;
-
     chomp;
 
     # strip comments
-    s/(#|;).*//g;
+    s/#.*//g;
 
     # remove any trailing whitespace
     s/^\s*//;