X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=ac675f7cafefa6496064a65172c27a9a6bc32e88;hb=ceb2daf21a03249decadc86f4b90711fe8a53b0e;hp=67dc56632d80b4d2e06abcb509daa2d239c7c71e;hpb=400227d4bd709387099bf224b1c00a6f988c8196;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";
 }