diff options
Diffstat (limited to 'LedgerSMB/Employee.pm')
-rw-r--r-- | LedgerSMB/Employee.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/LedgerSMB/Employee.pm b/LedgerSMB/Employee.pm index 0aa94961..bf22cb45 100644 --- a/LedgerSMB/Employee.pm +++ b/LedgerSMB/Employee.pm @@ -31,12 +31,14 @@ your software. package LedgerSMB::Employee; use LedgerSMB; use LedgerSMB::DBObject; +use strict; our $VERSION = '1.0.0'; our @ISA = qw(LedgerSMB::DBObject); sub AUTOLOAD { my $self = shift; + my $AUTOLOAD = $LedgerSMB::Employee::AUTOLOAD; $AUTOLOAD =~ s/^.*:://; my $procname = "employee_$AUTOLOAD"; $self->exec_method($procname, @_); |