From: minima Date: Mon, 22 Jan 2007 23:01:11 +0000 (+0000) Subject: try to stop selfspotter strings as names X-Git-Tag: 1.53~9 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=054659107044d10020c781b8709b50aeabb09e76;p=spider.git try to stop selfspotter strings as names --- diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 1002023c..b46d00f9 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -1487,6 +1487,10 @@ sub handle_41 $user = DXUser->new($call) unless $user; if ($_[2] == 1) { + if ($_[2] =~ /spotter/i) { + dbg("PCPROT: invalid name") if isdbg('chanerr'); + return; + } $user->name($_[3]); } elsif ($_[2] == 2) { $user->qth($_[3]);