X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Fsqlradius.pm;h=10bccb0347b3b221ec279335057538a716925874;hb=7555ad2262d45d5bf92d0ac958d6e92296eb00e0;hp=03802b2a797b13d351e64997bc34adf8bd194d92;hpb=beba6672fb9c9c5769c81f8029bb88cd2bc910e9;p=freeside.git diff --git a/FS/FS/part_export/sqlradius.pm b/FS/FS/part_export/sqlradius.pm index 03802b2a7..10bccb034 100644 --- a/FS/FS/part_export/sqlradius.pm +++ b/FS/FS/part_export/sqlradius.pm @@ -34,10 +34,10 @@ tie %options, 'Tie::IxHash', ; $notes1 = <<'END'; -Real-time export of radcheck, radreply and usergroup tables to any SQL database -for FreeRADIUS, -ICRADIUS -or Radiator. +Real-time export of radcheck, radreply and usergroup +tables to any SQL database for +FreeRADIUS +or ICRADIUS. END $notes2 = <<'END'; @@ -66,7 +66,7 @@ END %info = ( 'svc' => 'svc_acct', - 'desc' => 'Real-time export to SQL-backed RADIUS (FreeRADIUS, ICRADIUS, Radiator)', + 'desc' => 'Real-time export to SQL-backed RADIUS (FreeRADIUS, ICRADIUS)', 'options' => \%options, 'nodomain' => 'Y', 'notes' => $notes1. @@ -529,7 +529,8 @@ sub update_svc_acct { warn " svc_acct.seconds found (". $svc_acct->seconds. ") - decrementing\n" if $DEBUG; - $svc_acct->decrement_seconds($AcctSessionTime); + my $error = $svc_acct->decrement_seconds($AcctSessionTime); + die $error if $error; $status = 'done'; } else { warn " no existing seconds value for svc_acct - skiping\n" if $DEBUG;