X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcontact_phone.pm;h=46d6a9b6b6ab0c5e06bb26bf1765e5b755641f3b;hp=610753fc002d1951084b38fafe31b334494de038;hb=ff27c3f36240aee48ed50153dd5d8fe3ac3f2443;hpb=8fcb85e75b56d703cddc9569593c3468d6e49c7e diff --git a/FS/FS/contact_phone.pm b/FS/FS/contact_phone.pm index 610753fc0..46d6a9b6b 100644 --- a/FS/FS/contact_phone.pm +++ b/FS/FS/contact_phone.pm @@ -2,9 +2,6 @@ package FS::contact_phone; use base qw( FS::Record ); use strict; -use FS::Record qw( qsearch qsearchs ); -use FS::contact; -use FS::phone_type; =head1 NAME @@ -140,16 +137,6 @@ sub phonenum_pretty { } -sub contact { - my $self = shift; - qsearchs( 'contact', { 'contactnum' => $self->contactnum } ); -} - -sub phone_type { - my $self = shift; - qsearchs('phone_type', { 'phonetypenum' => $self->phonetypenum } ); -} - sub typename { my $self = shift; $self->phone_type->typename;