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 fd1ccd7..66e032b 100644 (file)
--- 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