X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=cmd%2Fshow%2Fchat.pl;h=6b01d20675b557432d161cb4cf9c3ed8e62d59bb;hb=96f67f30b496aafcb4276f9fe9cf0fa9f572318b;hp=7895c3b56523929d7fa54588ff309273a853574e;hpb=c3505bcfc922cd712bad2c20b3479cf8d1dc54fe;p=spider.git diff --git a/cmd/show/chat.pl b/cmd/show/chat.pl index 7895c3b5..6b01d206 100644 --- a/cmd/show/chat.pl +++ b/cmd/show/chat.pl @@ -1,7 +1,7 @@ # # print out the general log file for chat only # -# Copyright (c) 1998-2003 - Dirk Koopman G1TLH +# Copyright (c) 1998-2023 - Dirk Koopman G1TLH # # # @@ -28,11 +28,18 @@ while ($f = shift @f) { # next field next if $to; } next if $who; - ($who) = $f =~ /^(\w+)/o; + if ($f !~ /^\d+$/) { + ($who) = $f; + } +# ($who) = $f =~ /^(\w+)/o; } $to = 20 unless $to; $from = 0 unless $from; -@out = DXLog::print($from, $to, $main::systime, 'chat', $who); +if ($self->{_nospawn}) { + @out = DXLog::print($from, $to, $main::systime, 'chat', $who); +} else { + @out = $self->spawn_cmd("show/chat $cmdline", \&DXLog::print, args => [$from, $to, $main::systime, 'chat', $who]); +} return (1, @out);