X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=47b68667ca6e9d570589a3e0960b6c02cf12d82c;hb=aa63cbca3fa8ba421d356f7e954a69e014204524;hp=30ad8c560fd2b81a9ff1dad5dcc98fd8c0c68784;hpb=8ea73c533440d7f73f96f8110b9f597a26a75241;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 30ad8c56..47b68667 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -308,7 +308,7 @@ sub normal if ($self->{state} eq 'talk') { $self->send_talks($_, $self->msg('talkend')); } else { - $self->send_chats($_, $self->msg('chatend', $_)); + $self->local_send('C', $self->msg('chatend', $_)); } } $self->state('prompt'); @@ -329,7 +329,7 @@ sub normal if ($self->{state} eq 'talk') { $self->send_talks($_, $l); } else { - $self->send_chats($_, $l) + send_chats($self, $_, $l) } } } @@ -347,7 +347,7 @@ sub normal if ($self->{state} eq 'talk') { $self->send_talks($_, $rawline); } else { - $self->send_chats($_, $rawline); + send_chats($self, $_, $rawline); } } }