From b1c7bf3ab64205054c5b677fa55d21049e7a4d26 Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 19 Dec 2001 14:33:48 +0000 Subject: [PATCH] alas, a 5.6-ism --- FS/FS/svc_acct.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 11f09a116..139303b3c 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -552,10 +552,10 @@ sub replace { qsearchs( 'svc_acct', { 'username' => $new->username, 'domsvc' => $new->domsvc, } ); - { - no warnings 'numeric'; +# { +# no warnings 'numeric'; #alas, a 5.006-ism return "Can't change uid!" if $old->uid != $new->uid; - } +# } return "can't change username using Cyrus" if $cyrus_server && $old->username ne $new->username; @@ -963,7 +963,7 @@ sub ssh { =head1 VERSION -$Id: svc_acct.pm,v 1.57 2001-12-19 14:30:12 ivan Exp $ +$Id: svc_acct.pm,v 1.58 2001-12-19 14:33:48 ivan Exp $ =head1 BUGS -- 2.11.0