X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fsvc_Radius_Mixin.pm;h=66741620ccfc9293242935ecc06806a27f418089;hp=969f7495216cb1a1665eb29a8bcc58fbb49ec579;hb=5372897f367498972c96f5494e142e6e11b29eb8;hpb=0b25e1048d9d41cb92da42b99e0982910539f320 diff --git a/FS/FS/svc_Radius_Mixin.pm b/FS/FS/svc_Radius_Mixin.pm index 969f74952..66741620c 100644 --- a/FS/FS/svc_Radius_Mixin.pm +++ b/FS/FS/svc_Radius_Mixin.pm @@ -99,12 +99,12 @@ sub delete { local $FS::UID::AutoCommit = 0; my $dbh = dbh; - my $error = $self->SUPER::delete(@_) - || $self->process_m2m( + my $error = $self->process_m2m( 'link_table' => 'radius_usergroup', 'target_table' => 'radius_group', 'params' => [], - ); + ) + || $self->SUPER::delete; if ( $error ) { $dbh->rollback if $oldAutoCommit; @@ -185,9 +185,8 @@ sub seconds_since_sqlradacct { =item attribute_since_sqlradacct TIMESTAMP_START TIMESTAMP_END ATTRIBUTE -Returns the sum of the given attribute for all accounts (see L) -in this package for sessions ending between TIMESTAMP_START (inclusive) and -TIMESTAMP_END (exclusive). +For this service, returns the sum of the given attribute for sessions ending +between TIMESTAMP_START (inclusive) and TIMESTAMP_END (exclusive). TIMESTAMP_START and TIMESTAMP_END are specified as UNIX timestamps; see L. Also see L and L for conversion @@ -201,6 +200,17 @@ sub attribute_since_sqlradacct { $self->cust_svc->attribute_since_sqlradacct(@_); } +=item attribute_last_sqlradacct ATTRIBUTE + +For this service, returns the most recent value of the given attribute. + +=cut + +#note: POD here, implementation in FS::cust_svc +sub attribute_last_sqlradacct { + my $self = shift; + $self->cust_svc->attribute_last_sqlradacct(@_); +} =item get_session_history TIMESTAMP_START TIMESTAMP_END Returns an array of hash references of this customers login history for the