X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=06649f67afb9d64a5d7d85f7bb8c35d0c461a87a;hb=9392cc93cca60220a2c8e390e716cddc2807f177;hp=f3209c1866a368f7a9fc591484442e9557450b8a;hpb=3fb4b66f6009196cf901f0f88fbf4837a8b8b6f9;p=spider.git

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index f3209c18..06649f67 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1689,6 +1689,11 @@ sub handle_93
 		}
 	}
 
+	# this is catch loops caused by bad software ...
+	if (eph_dup("PC93|$from|$text|$onode")) {
+		return;
+	}
+
 	# if this is a 'bad spotter' user then ignore it
 	my $nossid = $from;
 	$nossid =~ s/-\d+$//;