X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fsvc_broadband.pm;h=a85fc5cb03e93da45fd35853787cb8888fb423dc;hp=1d1fa762c21f874ba93f38e0137ca7f26d2dcfec;hb=b6dbe0f12dbbe4ea5209367f905f937789b5b607;hpb=9ad2437e1cfaffceb657216a48ea3c7cc9414922 diff --git a/FS/FS/svc_broadband.pm b/FS/FS/svc_broadband.pm index 1d1fa762c..a85fc5cb0 100755 --- a/FS/FS/svc_broadband.pm +++ b/FS/FS/svc_broadband.pm @@ -2,6 +2,8 @@ package FS::svc_broadband; use strict; use vars qw(@ISA $conf); + +use base qw(FS::svc_Radius_Mixin FS::svc_Tower_Mixin FS::svc_Common); use NetAddr::IP; use FS::Record qw( qsearchs qsearch dbh ); use FS::svc_Common; @@ -10,8 +12,6 @@ use FS::addr_block; use FS::part_svc_router; use FS::tower_sector; -@ISA = qw( FS::svc_Radius_Mixin FS::svc_Tower_Mixin FS::svc_Common ); - $FS::UID::callback{'FS::svc_broadband'} = sub { $conf = new FS::Conf; }; @@ -398,11 +398,11 @@ sub check { if ( $cust_pkg && ! $self->latitude && ! $self->longitude ) { my $l = $cust_pkg->cust_location_or_main; if ( $l->ship_latitude && $l->ship_longitude ) { - $self->latitude = $l->ship_latitude; - $self->longitude = $l->ship_longitude; + $self->latitude( $l->ship_latitude ); + $self->longitude( $l->ship_longitude ); } elsif ( $l->latitude && $l->longitude ) { - $self->latitude = $l->latitude; - $self->longitude = $l->longitude; + $self->latitude( $l->latitude ); + $self->longitude( $l->longitude ); } }