local $SIG{QUIT} = 'IGNORE';
local $SIG{TERM} = 'IGNORE';
local $SIG{TSTP} = 'IGNORE';
+ local $SIG{PIPE} = 'IGNORE';
$error=$self->check;
return $error if $error;
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,
=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.6 1999-01-25 12:26:16 ivan Exp $
=head1 BUGS