diff options
| -rw-r--r-- | FS/FS/access_user.pm | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/FS/FS/access_user.pm b/FS/FS/access_user.pm index 9be9166f0..9128c42dd 100644 --- a/FS/FS/access_user.pm +++ b/FS/FS/access_user.pm @@ -200,10 +200,12 @@ sub replace { local $FS::UID::AutoCommit = 0; my $dbh = dbh; - my $error = $new->htpasswd_kludge(); - if ( $error ) { - $dbh->rollback or die $dbh->errstr if $oldAutoCommit; - return $error; + if ( $new->_password ne $old->_password ) { + my $error = $new->htpasswd_kludge(); + if ( $error ) { + $dbh->rollback or die $dbh->errstr if $oldAutoCommit; + return $error; + } } $error = $new->SUPER::replace($old, @_); |