X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FDXProt.pm;h=17328bc2cc6ee79c9e31d76cd31cd8df929d393d;hb=a06ff95db570322cf86b713d4a6b410ea007b8e0;hp=d9e59c4937bc9211cc8425a804760879dfba6aa6;hpb=84e68f5fca6f33df5e2c7c801038043d339aaac2;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index d9e59c49..17328bc2 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -661,6 +661,7 @@ sub normal
 		if ($pcno == 50) {		# keep alive/user list
 			my $node = DXCluster->get_exact($field[1]);
 			if ($node) {
+				return unless $node->isa('DXNode');
 				return unless $node->dxchan == $self;
 				$node->update_users($field[2]);
 			}