X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Ftalk.pl;h=f30d95ec57e9676e29f87cfdb772d242b70fe82e;hb=c961a6af6d9aec8eba4d58803f890fc514a109cc;hp=612f2b089358bebda4c03095677a49de616b90ed;hpb=099c6b4a10d9f1e7471b0c94273cd992b5814cdc;p=spider.git diff --git a/cmd/show/talk.pl b/cmd/show/talk.pl index 612f2b08..f30d95ec 100644 --- a/cmd/show/talk.pl +++ b/cmd/show/talk.pl @@ -13,7 +13,7 @@ my $cmdline = shift; my @f = split /\s+/, $cmdline; my $f; my @out; -my ($from, $to); +my ($from, $to, $who); $from = 0; while ($f = shift @f) { # next field @@ -26,9 +26,12 @@ while ($f = shift @f) { # next field ($to) = $f =~ /^(\d+)$/o if !$to; # is it a to count? next if $to; } + next if $who; + ($who) = $f =~ /^(\w+)/o; } -$to = 20 if !$to; +$to = 20 unless $to; +$from = 0 unless $from; -@out = DXLog::print($from, $to, $main::systime, '^talk'); +@out = DXLog::print($from, $to, $main::systime, '^talk', $who); return (1, @out);