X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fphone_device.pm;h=b891bb2947381fbe148031994f17e52476f63dfc;hb=ee2d87613c1720cdf4f97e2ee0dcc1f8dfa781ff;hp=ba765e026f260f5f1e729af7be58127f230c268b;hpb=b5c4237a34aef94976bc343c8d9e138664fc3984;p=freeside.git diff --git a/FS/FS/phone_device.pm b/FS/FS/phone_device.pm index ba765e026..b891bb294 100644 --- a/FS/FS/phone_device.pm +++ b/FS/FS/phone_device.pm @@ -1,11 +1,9 @@ package FS::phone_device; +use base qw( FS::MAC_Mixin FS::Record ); use strict; -use base qw( FS::Record ); use Scalar::Util qw( blessed ); -use FS::Record qw( dbh qsearchs ); # qsearch ); -use FS::part_device; -use FS::svc_phone; +use FS::Record qw( dbh ); # qsearch qsearchs dbh ); =head1 NAME @@ -208,25 +206,11 @@ sub check { Returns the device type record (see L) associated with this customer device. -=cut - -sub part_device { - my $self = shift; - qsearchs( 'part_device', { 'devicepart' => $self->devicepart } ); -} - =item svc_phone Returns the phone number (see L) associated with this customer device. -=cut - -sub svc_phone { - my $self = shift; - qsearchs( 'svc_phone', { 'svcnum' => $self->svcnum } ); -} - =item export HOOK [ EXPORT_ARGS ] Runs the provided export hook (i.e. "device_insert") for this service.