X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=ac675f7cafefa6496064a65172c27a9a6bc32e88;hb=refs%2Fheads%2Fstaging;hp=67dc56632d80b4d2e06abcb509daa2d239c7c71e;hpb=8467e0bbd9951b6b2395e832c7f54f78f5fff8cc;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 67dc5663..ac675f7c 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1082,7 +1082,7 @@ sub get_hops
 {
 	my $pcno = shift;
 	my $hops = $DXProt::hopcount{$pcno};
-	$hops = $DXProt::def_hopcount if !$hops;
+	$hops = $DXProt::def_hopcount unless $hops;
 	return "H$hops";
 }