chiark / gitweb /
Do not log nomsgs tell events
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 15 Mar 2002 16:49:24 +0000 (16:49 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Fri, 15 Mar 2002 16:49:24 +0000 (16:49 +0000)
bot.tcl

diff --git a/bot.tcl b/bot.tcl
index 06f0b7c61ff59b6ae340816c22e1be9bc4fe3045..9a7daea46ccba615f69a6aedcfff40133b9503df 100755 (executable)
--- a/bot.tcl
+++ b/bot.tcl
@@ -233,7 +233,9 @@ proc tell_event_core {nl event} {
        log_intern "tell event error" "$emsg >$errorInfo<"
        set emsg ERROR
     } else {
-       log_intern "tell event" "done $tell_event_teventi $emsg"
+       if {"$emsg" != "nomsgs"} {
+           log_intern "tell event" "done $tell_event_teventi $emsg"
+       }
     }
     return $emsg
 }