From: djk Date: Tue, 16 Nov 1999 20:56:02 +0000 (+0000) Subject: remove check for existing user out of DXUser::new X-Git-Tag: R_1_35~29 X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=89ab02190d47c949e48b303260055f00591e3cdd;p=spider.git remove check for existing user out of DXUser::new --- diff --git a/perl/DXUser.pm b/perl/DXUser.pm index a6474abe..fc2dab5c 100644 --- a/perl/DXUser.pm +++ b/perl/DXUser.pm @@ -114,7 +114,7 @@ sub new my $call = uc shift; # $call =~ s/-\d+$//o; - confess "can't create existing call $call in User\n!" if $u{$call}; +# confess "can't create existing call $call in User\n!" if $u{$call}; my $self = bless {}, $pkg; $self->{call} = $call;