summaryrefslogtreecommitdiff
path: root/FS/FS/tower_sector.pm
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2013-12-28 16:11:46 -0800
committerIvan Kohler <ivan@freeside.biz>2013-12-28 16:11:46 -0800
commit32072dbf59a054529f5304574c0f56f9567d14d0 (patch)
treeeaca19adc8da8daf4b0eaaed1a16c3a8e5a53cb0 /FS/FS/tower_sector.pm
parent66c235e33563ccd785ff9e0828398f778a75fb9f (diff)
autoload methods returning foreign records, RT#13971
Diffstat (limited to 'FS/FS/tower_sector.pm')
-rw-r--r--FS/FS/tower_sector.pm19
1 files changed, 1 insertions, 18 deletions
diff --git a/FS/FS/tower_sector.pm b/FS/FS/tower_sector.pm
index 70642fb..7e6819a 100644
--- a/FS/FS/tower_sector.pm
+++ b/FS/FS/tower_sector.pm
@@ -1,10 +1,7 @@
package FS::tower_sector;
+use base qw( FS::Record );
use strict;
-use base qw( FS::Record );
-use FS::Record qw( qsearch qsearchs );
-use FS::tower;
-use FS::svc_broadband;
=head1 NAME
@@ -123,13 +120,6 @@ sub check {
Returns the tower for this sector, as an FS::tower object (see L<FS::tower>).
-=cut
-
-sub tower {
- my $self = shift;
- qsearchs('tower', { 'towernum'=>$self->towernum } );
-}
-
=item description
Returns a description for this sector including tower name.
@@ -150,13 +140,6 @@ sub description {
Returns the services on this tower sector.
-=cut
-
-sub svc_broadband {
- my $self = shift;
- qsearch('svc_broadband', { 'sectornum' => $self->sectornum });
-}
-
=back
=head1 BUGS