From: ivan <ivan>
Date: Tue, 16 Apr 2002 23:14:30 +0000 (+0000)
Subject: there it is!  fix bug with FS::cust_main::agent
X-Git-Tag: freeside_1_4_0_pre12~76
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=d33826efa91645efc00dc8a20e8d0bda8f87ecbd

there it is!  fix bug with FS::cust_main::agent
---

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index fd1ccd772..66e032b0e 100644
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -827,7 +827,7 @@ Returns the agent (see L<FS::agent>) for this customer.
 
 sub agent {
   my $self = shift;
-  qsearchs( 'agent', { 'agent' => $self->agentnum } );
+  qsearchs( 'agent', { 'agentnum' => $self->agentnum } );
 }
 
 =item bill OPTIONS