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

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