summaryrefslogtreecommitdiff
path: root/site_perl/svc_acct_sm.pm
diff options
context:
space:
mode:
authorivan <ivan>1999-01-18 21:58:10 +0000
committerivan <ivan>1999-01-18 21:58:10 +0000
commita99792ee88e249c27c661a4ece2b4fa241f59e76 (patch)
treee8cc9619350d597281f84c8ed815f8c602499370 /site_perl/svc_acct_sm.pm
parent183f64ede863fff923db7e00d962b3495e405477 (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.pm4
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