autoload methods returning foreign records, RT#13971

1 files changed, 2 insertions, 9 deletions

diff --git a/FS/FS/invoice_mode.pm b/FS/FS/invoice_mode.pm
index 115dd44..3f0897d 100644
--- a/FS/FS/invoice_mode.pm
+++ b/FS/FS/invoice_mode.pm
@@ -1,8 +1,8 @@
 package FS::invoice_mode;
+use base qw(FS::Record);
 
 use strict;
-use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );
+use FS::Record qw( qsearchs ); #qsearch qsearchs );
 use FS::invoice_conf;
 
 =head1 NAME
@@ -138,13 +138,6 @@ sub invoice_conf {
 
 Returns the agent associated with this invoice mode, if any.
 
-=cut
-
-sub agent {
-  my $self = shift;
-  $self->agentnum ? FS::agent->by_key($self->agentnum) : '';
-}
-
 =back
 
 =head1 SEE ALSO