X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Ftower.pm;h=f371ec9c72dbe3e492684952451e6f9a0e8ca082;hb=3cbdd85a96348a287623e3b97c937c7749e99392;hp=052836e27e9dfbbd530107dacd8053d80a932bf8;hpb=426d4e697c5a96fc4884c444835b7e17b181b93b;p=freeside.git diff --git a/FS/FS/tower.pm b/FS/FS/tower.pm index 052836e27..f371ec9c7 100644 --- a/FS/FS/tower.pm +++ b/FS/FS/tower.pm @@ -1,10 +1,10 @@ package FS::tower; +use base qw( FS::o2m_Common FS::Record ); use strict; -use base qw( FS::o2m_Common FS::Record ); +use List::Util qw( max ); use FS::Record qw( qsearch qsearchs ); use FS::tower_sector; -use List::Util qw( max ); =head1 NAME @@ -90,6 +90,13 @@ sub check { $self->ut_numbern('towernum') || $self->ut_text('towername') || $self->ut_enum('disabled', [ '', 'Y' ]) + || $self->ut_coordn('latitude') + || $self->ut_coordn('longitude') + || $self->ut_enum('coord_auto', [ '', 'Y' ]) + || $self->ut_floatn('altitude') + || $self->ut_floatn('height') + || $self->ut_floatn('veg_height') + || $self->ut_alphan('color') ; return $error if $error;