summaryrefslogtreecommitdiff
path: root/sql-ledger/SL/Inifile.pm
diff options
context:
space:
mode:
Diffstat (limited to 'sql-ledger/SL/Inifile.pm')
-rw-r--r--sql-ledger/SL/Inifile.pm7
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 : $!");