]> git.donarmstrong.com Git - infobot.git/commitdiff
- simonrvn found that .say is broken - msg() fixed ;)
authordms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Tue, 6 May 2003 16:22:15 +0000 (16:22 +0000)
committerdms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Tue, 6 May 2003 16:22:15 +0000 (16:22 +0000)
- .say: replaced $1/$2 with their vars.

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@782 c11ca15a-4712-0410-83d8-924469b57eb5

src/IRC/Irc.pl
src/Modules/UserDCC.pl

index a82aa7f9c2be09ac1a2a6128b2b57920a323d510..fda552156605c9f7498480bf45014c194cd95046 100644 (file)
@@ -244,39 +244,31 @@ sub msg {
        return;
     }
 
-    if ($msgType =~ /chat/i) {
-       # todo: warn that we're using msg() to do DCC CHAT?
-       &dccsay($nick, $msg);
-       # todo: make dccsay deal with flood protection?
-       return;
-    }
-
     &status(">$nick< $msg");
 
-    if (&whatInterface() =~ /IRC/) {
-       my $t = time();
+    return unless (&whatInterface() =~ /IRC/);
+    my $t = time();
 
-       if ($t == $msgtime) {
-           $msgcount++;
-           $msgsize += length $msg;
+    if ($t == $msgtime) {
+       $msgcount++;
+       $msgsize += length $msg;
 
-           my $i = &getChanConfDefault("sendPrivateLimitLines", 3);
-           my $j = &getChanConfDefault("sendPrivateLimitBytes", 1000);
-           if ( ($msgcount % $i) == 0 and $msgcount) {
-               sleep 1;
-           } elsif ($msgsize > $j) {
-               sleep 1;
-               $msgsize -= $j;
-           }
-
-       } else {
-           $msgcount   = 0;
-           $msgtime    = $t;
-           $msgsize    = length $msg;
+       my $i = &getChanConfDefault("sendPrivateLimitLines", 3);
+       my $j = &getChanConfDefault("sendPrivateLimitBytes", 1000);
+       if ( ($msgcount % $i) == 0 and $msgcount) {
+           sleep 1;
+       } elsif ($msgsize > $j) {
+           sleep 1;
+           $msgsize -= $j;
        }
 
-       $conn->privmsg($nick, $msg);
+    } else {
+       $msgcount       = 0;
+       $msgtime        = $t;
+       $msgsize        = length $msg;
     }
+
+    $conn->privmsg($nick, $msg);
 }
 
 # Usage: &action(nick || chan, txt);
index f8ac484c71aa17d53cfed8c863ad205bfa43ba9f..02a68074ef797185300e694123fd6ba34c776589 100644 (file)
@@ -339,9 +339,9 @@ sub userDCC {
        &DEBUG("chan => '$1', msg => '$msg'.");
 
        if (&validChan($chan)) {
-           &msg($chan, $2);
+           &msg($chan, $msg);
        } else {
-           &msg($who,"i'm not on \002$1\002, sorry.");
+           &msg($who,"i'm not on \002$chan\002, sorry.");
        }
        return;
     }