diff options
Diffstat (limited to 'httemplate/edit/process')
| -rwxr-xr-x | httemplate/edit/process/svc_acct.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/httemplate/edit/process/svc_acct.cgi b/httemplate/edit/process/svc_acct.cgi index c19c2a51f..515d89e91 100755 --- a/httemplate/edit/process/svc_acct.cgi +++ b/httemplate/edit/process/svc_acct.cgi @@ -11,6 +11,7 @@ die "access denied" $cgi->param('svcnum') =~ /^(\d*)$/ or die "Illegal svcnum!"; my $svcnum = $1; +my $error; my $old; if ( $svcnum ) { @@ -45,10 +46,9 @@ if( $cgi->param('clear_password') eq '*HIDDEN*' die "fatal: no previous account to recall hidden password from!" unless $old; } else { - $new->set_password($cgi->param('clear_password')); + $error = $new->set_password($cgi->param('clear_password')); } -my $error; if ( $svcnum ) { foreach (grep { $old->$_ != $new->$_ } qw( seconds upbytes downbytes totalbytes )) { my %hash = map { $_ => $new->$_ } |