X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fradius_attr.pm;h=16d3f62a30e957098dbe76a260bb034c482cc7ad;hb=db5785cba180e2c210d3ab4d37064c7e61898614;hp=51b1bab6d201a9f48b92c76f506771ac4bec6de1;hpb=fb4ab1073f0d15d660c6cdc4e07afebf68ef3924;p=freeside.git diff --git a/FS/FS/radius_attr.pm b/FS/FS/radius_attr.pm index 51b1bab6d..16d3f62a3 100644 --- a/FS/FS/radius_attr.pm +++ b/FS/FS/radius_attr.pm @@ -1,9 +1,11 @@ package FS::radius_attr; +use base qw( FS::Record ); use strict; -use base qw( FS::Record ); -use FS::Record qw( qsearch qsearchs ); use vars qw( $noexport_hack ); +use FS::Record qw( qsearch ); #qsearchs ); + +$noexport_hack = 0; =head1 NAME @@ -174,13 +176,6 @@ sub check { Returns the L object to which this attribute applies. -=cut - -sub radius_group { - my $self = shift; - qsearchs('radius_group', { 'groupnum' => $self->groupnum }); -} - =back =head1 CLASS METHODS @@ -195,7 +190,7 @@ check or R for reply. =cut my %ops = ( - C => [ '==', ':=', '+=', '!=', '>', '>=', '<', '<=', '=~', '!~', '=*', '!*' ], + C => [ '=', '==', ':=', '+=', '!=', '>', '>=', '<', '<=', '=~', '!~', '=*', '!*' ], R => [ '=', ':=', '+=' ], );