From: minima Date: Thu, 2 Nov 2000 00:36:39 +0000 (+0000) Subject: boring... X-Git-Tag: R_1_45~54 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=89ce129e42ed35f87e9f98dfd7d7d6c8297383e0;p=spider.git boring... --- diff --git a/cmd/show/msg_status.pl b/cmd/show/msg_status.pl index 6462568a..6c3e1cb3 100644 --- a/cmd/show/msg_status.pl +++ b/cmd/show/msg_status.pl @@ -23,7 +23,8 @@ if (!$line || $line =~ /^w/i) { push @out, "----------"; for (keys %DXMsg::work) { my $r = $DXMsg::work{$_}; - push @out, "$_ : msgno $r->{msgno}, total lines $r->{linesreq}, count $r->{count}\n"; + my $n = @{$r->{lines}}; + push @out, "$_ : msgno $r->{msgno}, total lines $n, count $r->{count}\n"; push @out, "$_ : stream $r->{stream}, tonode $r->{tonode}, fromnode $r->{fromnode}\n"; } }