From 89ab02190d47c949e48b303260055f00591e3cdd Mon Sep 17 00:00:00 2001
From: djk <djk>
Date: Tue, 16 Nov 1999 20:56:02 +0000
Subject: [PATCH] remove check for existing user out of DXUser::new

---
 perl/DXUser.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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;
-- 
2.34.1