X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProtHandle.pm;h=f2d5b55946366deb2789f950d3e087ce974ea8bd;hb=3cdd57e7baf63341fdcba6b764f304291ed0dbb2;hp=e7160d7cb7148b0e59e5a809cd63258163f0e7b4;hpb=0560e85c7f60462fccb5b54d5ec2c0d88338001e;p=spider.git

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index e7160d7c..f2d5b559 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1709,7 +1709,7 @@ sub handle_92
 		}
 
 	} elsif ($sort eq 'K') {
-		$pc92Kin += length $line if $sort eq 'K';
+		$pc92Kin += length $line;
 
 		# remember the last channel we arrived on
 		$parent->PC92C_dxchan($self->{call}) unless $self->{call} eq $parent->call;