X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=FS%2FFS%2Fsvc_alarm.pm;fp=FS%2FFS%2Fsvc_alarm.pm;h=fafd9e88686120a5e0e750a2743847a6989e9ff3;hb=32072dbf59a054529f5304574c0f56f9567d14d0;hp=4a355c7c168e0bc3bef9134bf194098b7206dd90;hpb=66c235e33563ccd785ff9e0828398f778a75fb9f;p=freeside.git

diff --git a/FS/FS/svc_alarm.pm b/FS/FS/svc_alarm.pm
index 4a355c7c1..fafd9e886 100644
--- a/FS/FS/svc_alarm.pm
+++ b/FS/FS/svc_alarm.pm
@@ -1,9 +1,8 @@
 package FS::svc_alarm;
+use base qw( FS::svc_Common );
 
 use strict;
-use base qw( FS::svc_Common );
 use Tie::IxHash;
-use FS::Record qw( qsearchs ); # qw( qsearch qsearchs );
 use FS::alarm_system;
 use FS::alarm_type;
 use FS::alarm_station;
@@ -209,16 +208,6 @@ sub check {
   $self->SUPER::check;
 }
 
-sub alarm_system  {
-  qsearchs('alarm_system',  { alarmsystemnum  => shift->alarmsystemnum  } );
-}
-sub alarm_type    {
-  qsearchs('alarm_type',    { alarmtypenum    => shift->alarmtypenum    } );
-}
-sub alarm_station {
-  qsearchs('alarm_station', { alarmstationnum => shift->alarmstationnum } );
-}
-
 =back
 
 =head1 SEE ALSO