X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcontact_email.pm;h=8d6bbbf6f3255cf7884b14ad480c9a93b0bc6ce9;hb=f4daf7e8c831fe126dc3fd1d6d0db5ee3b46d602;hp=4f787358b4f23625ab1acad2182c0b20be09b8f3;hpb=caad814a67620dad4aa97f0c5be8adb324956cc1;p=freeside.git

diff --git a/FS/FS/contact_email.pm b/FS/FS/contact_email.pm
index 4f787358b..8d6bbbf6f 100644
--- a/FS/FS/contact_email.pm
+++ b/FS/FS/contact_email.pm
@@ -2,8 +2,7 @@ package FS::contact_email;
 use base qw( FS::Record );
 
 use strict;
-use FS::Record qw( qsearch qsearchs );
-use FS::contact;
+use FS::Msgcat qw( gettext );
 
 =head1 NAME
 
@@ -112,11 +111,6 @@ sub check {
   $self->SUPER::check;
 }
 
-sub contact {
-  my $self = shift;
-  qsearchs( 'contact', { 'contactnum' => $self->contactnum } );
-}
-
 =back
 
 =head1 BUGS