X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fsvc_cable.pm;h=3a1dc5ae9b75047e948a75eb8c136ce3ac3d5088;hb=b7c25d5e38e6459efe5d1c2f09f437b79798038e;hp=5d281135b1a10959ab598754331da7730a82e076;hpb=c3d33450dd1d457bc8b8c008fe17ffc9128201b1;p=freeside.git diff --git a/FS/FS/svc_cable.pm b/FS/FS/svc_cable.pm index 5d281135b..3a1dc5ae9 100644 --- a/FS/FS/svc_cable.pm +++ b/FS/FS/svc_cable.pm @@ -5,9 +5,6 @@ use base qw( FS::svc_MAC_Mixin use strict; use Tie::IxHash; -use FS::Record qw( qsearchs ); # qw( qsearch qsearchs ); -use FS::cable_provider; -use FS::cable_model; =head1 NAME @@ -175,24 +172,10 @@ sub check { Returns the cable_provider object for this record. -=cut - -sub cable_provider { - my $self = shift; - qsearchs('cable_provider', { 'providernum'=>$self->providernum } ); -} - =item cable_model Returns the cable_model object for this record. -=cut - -sub cable_model { - my $self = shift; - qsearchs('cable_model', { 'modelnum'=>$self->modelnum } ); -} - =back =head1 BUGS