diff options
Diffstat (limited to 'site_perl/svc_acct_sm.pm')
| -rw-r--r-- | site_perl/svc_acct_sm.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/site_perl/svc_acct_sm.pm b/site_perl/svc_acct_sm.pm index 75e7b0281..5c0f510e4 100644 --- a/site_perl/svc_acct_sm.pm +++ b/site_perl/svc_acct_sm.pm @@ -157,7 +157,7 @@ sub replace { return "Domain username (domuser) in use for this domain (domsvc)" if ( $old->domuser ne $new->domuser - || $old->domsvc ne $new->domsvc + || $old->domsvc != $new->domsvc ) && qsearchs('svc_acct_sm',{ 'domuser'=> $new->domuser, 'domsvc' => $new->domsvc, @@ -229,7 +229,7 @@ sub check { =head1 VERSION -$Id: svc_acct_sm.pm,v 1.4 1998-12-30 00:30:46 ivan Exp $ +$Id: svc_acct_sm.pm,v 1.5 1999-01-18 21:58:10 ivan Exp $ =head1 BUGS |