X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Frcmd.pl;h=0a362075ce0005e17e549bee2d7b98c3db81eeef;hb=ee55bc4f9cf0763f17c9698ab4c7d47a4e7008ce;hp=bc3a71f95590e8a239d03e0ba75f7af6d088781f;hpb=69c8aeb338cc485103e289fbab7ec4e7e056ed20;p=spider.git diff --git a/cmd/show/rcmd.pl b/cmd/show/rcmd.pl index bc3a71f9..0a362075 100644 --- a/cmd/show/rcmd.pl +++ b/cmd/show/rcmd.pl @@ -3,7 +3,7 @@ # # Copyright (c) 1998 - Dirk Koopman G1TLH # -# $Id$ +# # my $self = shift; @@ -27,11 +27,14 @@ while ($f = shift @f) { # next field next if $to; } next if $who; - ($who) = $f =~ /^(\w+)/o; + if ($f !~ /^\d+/) { + ($who) = $f; + } } $to = 20 unless $to; $from = 0 unless $from; -@out = DXLog::print($from, $to, $main::systime, '^rcmd', $who); -return (1, @out); +return (1, DXLog::print($from, $to, $main::systime, 'rcmd', $who)) if $self->{_nospawn}; +return (1, $self->spawn_cmd("show/rcmd $cmdline", \&DXLog::print, args => [$from, $to, $main::systime, 'rcmd', $who])); +