add #9000 as a default group and tidy up send_chats calls

[spider.git] / perl / DXProt.pm

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 0ca491ea24c49842c18612c66fa3914579001ea2..af28b19244877fabde913352b2da767bbb51ceac 100644 (file)
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -1541,7 +1541,7 @@ sub import_chat
                                Log('ann', $target, $main::mycall, $text);
                                $main::me->normal(DXProt::pc93($target, $main::mycall, $via, $text));
                        } else {
-                               $main::me->send_chats($target, $text);
+                               DXCommandmode::send_chats($main::me, $target, $text);
                        }
                }
        }