X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=cmd%2Fchat.pl;h=80cb12664e49e361e19a4667b694601860d4eae7;hb=0c1082247c57a0ec2fa35a0a81af54b1e6ac2b89;hp=cace4508250816edf5eae169ffcedd554e8dfe5d;hpb=5f2487385b59dbe88dc763fa9c26fe5a9b4a6b30;p=spider.git diff --git a/cmd/chat.pl b/cmd/chat.pl index cace4508..80cb1266 100644 --- a/cmd/chat.pl +++ b/cmd/chat.pl @@ -29,7 +29,7 @@ $line =~ s/\^/:/og; my @bad; if (@bad = BadWords::check($line)) { $self->badcount(($self->badcount||0) + @bad); - Log('DXCommand', "$self->{call} swore: $line"); + LogDbg('DXCommand', "$self->{call} swore: $line (with words:" . join(',', @bad) . ")"); Log('chat', $target, $from, "[to $from only] $line"); return (1, "$target de $from <$t>: $line"); } @@ -38,6 +38,8 @@ if (@bad = BadWords::check($line)) { my $msgid = DXProt::nextchatmsgid(); $text = "#$msgid $text"; -DXProt::send_chat($self, DXProt::pc12($from, $text, '*', $target), $from, '*', $text, $target, $main::mycall, '0'); +$main::me->normal(DXProt::pc93($to, $from, undef, $text)); + +#DXProt:):send_chat($self, 1, DXProt::pc12($from, $text, '*', $target), $from, '*', $text, $target, $main::mycall, '0'); return (1, ());