part of making rcmd work again for async cmds

[spider.git] / cmd / show / groups.pl

diff --git a/cmd/show/groups.pl b/cmd/show/groups.pl
index 48ab9e10d4bcb093141898673112e0f798ec9556..8cbf54e6c2940b10faf20593b03aad0a0c84410a 100644 (file)
--- a/cmd/show/groups.pl
+++ b/cmd/show/groups.pl
@@ -20,7 +20,7 @@ sub handle
        my @out;
        $to = 500 unless $to;
 
-       @out = $self->spawn_cmd(\&DXLog::print, 
+       @out = $self->spawn_cmd("show/groups $to", \&DXLog::print, 
                                                        args => [0, $to, $main::systime, 'chat', undef], 
                                                        cb => sub {
                                                                my $self = shift;
@@ -103,7 +103,7 @@ sub handle
                                                                        }
                                                                        push (@out, "-");
                                                                }
-                                                               $self->send(@out) if @out;
+                                                               return @out;
                                                        });
        
        #       my @chatlog = DXLog::print(undef, $to, $main::systime, 'chat', undef);