diff options
| -rw-r--r-- | LedgerSMB/DBObject.pm | 7 | ||||
| -rw-r--r-- | LedgerSMB/Setting.pm | 2 |
2 files changed, 8 insertions, 1 deletions
diff --git a/LedgerSMB/DBObject.pm b/LedgerSMB/DBObject.pm index 83a94d4a..5c07e15e 100644 --- a/LedgerSMB/DBObject.pm +++ b/LedgerSMB/DBObject.pm @@ -30,6 +30,13 @@ use warnings; our @ISA = qw(LedgerSMB); +our $AUTOLOAD; + +sub AUTOLOAD { + my ($self) = shift; + $self->exec_method($AUTOLOAD, @_); +} + sub new { my $self = shift @_; my $lsmb = shift @_; diff --git a/LedgerSMB/Setting.pm b/LedgerSMB/Setting.pm index a79b89c9..bef80f60 100644 --- a/LedgerSMB/Setting.pm +++ b/LedgerSMB/Setting.pm @@ -57,7 +57,7 @@ sub get { $self->merge($hashref, 'value'); } -sub parse_incriment { +sub parse_increment { my $self = shift; my $myconfig = shift; |