Sleep a little bit between messages

Otherwise they are sometimes delivered out of order.
Raku · Aug 19, 2019 · 72b3976 · 72b3976
1 parent c46a08f
commit 72b3976
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/xbin/Tellable.p6 b/xbin/Tellable.p6
@@ -74,7 +74,8 @@ multi method irc-privmsg-channel($msg) {
             next if .<heard> and timestampish() - DateTime.new(.<timestamp>) ≤ $heard-timeout
                     and .<channel> eq $msg.channel and not %*ENV<TESTABLE>;
             my $text = sprintf ‘%s %s <%s> %s’, .<timestamp channel from text>;
-            $msg.irc.send-cmd: 'PRIVMSG', $msg.channel, $text, :server($msg.server)
+            $msg.irc.send-cmd: 'PRIVMSG', $msg.channel, $text, :server($msg.server);
+            sleep 0.3;
         }
         %mail{$normalized}:delete;
         $db-tell.write: %mail;