X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Frcmd.pl;h=df64298b640e161b870ee6fa4fddce16a250ea9f;hb=96f67f30b496aafcb4276f9fe9cf0fa9f572318b;hp=bc3a71f95590e8a239d03e0ba75f7af6d088781f;hpb=69c8aeb338cc485103e289fbab7ec4e7e056ed20;p=spider.git diff --git a/cmd/show/rcmd.pl b/cmd/show/rcmd.pl index bc3a71f9..df64298b 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])); +