diff options
author | ivan <ivan> | 1999-01-18 21:58:10 +0000 |
---|---|---|
committer | ivan <ivan> | 1999-01-18 21:58:10 +0000 |
commit | a99792ee88e249c27c661a4ece2b4fa241f59e76 (patch) | |
tree | e8cc9619350d597281f84c8ed815f8c602499370 /site_perl/svc_acct_sm.pm | |
parent | 183f64ede863fff923db7e00d962b3495e405477 (diff) |
esthetic: eq and ne were used in a few places instead of == and !=
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 |