diff options
Diffstat (limited to 'httemplate/edit/process')
| -rwxr-xr-x | httemplate/edit/process/svc_acct.cgi | 10 | 
1 files changed, 9 insertions, 1 deletions
diff --git a/httemplate/edit/process/svc_acct.cgi b/httemplate/edit/process/svc_acct.cgi index a4a6c0015..d9aac9fac 100755 --- a/httemplate/edit/process/svc_acct.cgi +++ b/httemplate/edit/process/svc_acct.cgi @@ -38,7 +38,15 @@  %  %my $error;  %if ( $svcnum ) { -%  $error = $new->replace($old); +%  foreach (grep { $old->$_ != $new->$_ } qw( seconds upbytes downbytes totalbytes )) { +%    my %hash = map { $_ => $new->$_ }  +%               grep { $new->$_ } +%               qw( seconds upbytes downbytes totalbytes ); +% +%    $error = $new->set_usage(\%hash);  #unoverlimit and trigger radius changes +%    last;                              #once is enough +%  } +%  $error ||= $new->replace($old);  %} else {  %  $error = $new->insert;  %  $svcnum = $new->svcnum;  | 
