diff options
Diffstat (limited to 'sql-ledger/SL/Inifile.pm')
-rw-r--r-- | sql-ledger/SL/Inifile.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/sql-ledger/SL/Inifile.pm b/sql-ledger/SL/Inifile.pm index e9de47a8f..8ccf4334d 100644 --- a/sql-ledger/SL/Inifile.pm +++ b/sql-ledger/SL/Inifile.pm @@ -1,6 +1,6 @@ #===================================================================== # SQL-Ledger Accounting -# Copyright (C) 2001 +# Copyright (C) 2002 # # Author: Dieter Simader # Email: dsimader@sql-ledger.org @@ -12,7 +12,7 @@ # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. -# +# # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the @@ -35,7 +35,8 @@ sub new { my $id = ""; my $skip; - + + $self ||= {}; $type = ref($self) || $self; open FH, "$file" or Form->error("$file : $!"); |