From 006b909f167653228b41c4725d2b55e9b1860097 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Fri, 9 Mar 2007 23:51:27 +0000
Subject: Employee search now works

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@873 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/Location.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'LedgerSMB/Location.pm')

diff --git a/LedgerSMB/Location.pm b/LedgerSMB/Location.pm
index 95128e51..69403a7b 100644
--- a/LedgerSMB/Location.pm
+++ b/LedgerSMB/Location.pm
@@ -37,8 +37,10 @@ our $VERSION = '1.0.0';
 our @ISA = qw(LedgerSMB::DBObject);
 
 sub AUTOLOAD {
-	my $procname = "location_$LedgerSMB::Location::Autoload";
-	$self->exec_method($procname);
+	my $self = shift;
+	$AUTOLOAD =~ s/^.*:://;
+	my $procname = "location_$AUTOLOAD";
+	$self->exec_method($procname, @_);
 }
 
 sub save {
-- 
cgit v1.2.3