X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/dae6150e52e9fd344e0c05fad970c0d0a1293378..085830e6e43fe92527fbce31b736b5c596aa45fc:/SL/User.pm

diff --git a/SL/User.pm b/SL/User.pm
index 2da621694..7a2606915 100644
--- a/SL/User.pm
+++ b/SL/User.pm
@@ -57,7 +57,7 @@ sub new {
           # remove any trailing whitespace
           s/^\s*(.*?)\s*$/$1/;
 
-          ($key, $value) = split /=/, $_, 2;
+          ($key, $value) = split(/=/, $_, 2);
 
           if (($key eq "stylesheet") && ($value eq "sql-ledger.css")) {
             $value = "lx-office-erp.css";
@@ -496,7 +496,7 @@ sub dbsources_unused {
 
   while (<FH>) {
     if (/^dbname=/) {
-      my ($null, $item) = split /=/;
+      my ($null, $item) = split(/=/);
       push @dbexcl, $item;
     }
   }