From 1aee1f2d8bf438af708d92b8a95a6d75e446c482 Mon Sep 17 00:00:00 2001 From: Stephen Chang Date: Thu, 14 May 2015 19:18:36 +0000 Subject: [PATCH] remove debugging output --- irc-bot.rkt | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/irc-bot.rkt b/irc-bot.rkt index 2e7f6e2..453499f 100644 --- a/irc-bot.rkt +++ b/irc-bot.rkt @@ -41,14 +41,11 @@ (sync (irc-connect/internal)) (join-channels)) (sleep 60) - (loop))))) - (printf "conn: ~a\n" current-irc-connection)) + (loop)))))) (define (join-channels) - (printf "join: ~a\n" current-irc-connection) (for ([c irc-channels]) (irc-join-channel current-irc-connection c))) (define (irc-paste msg) - (printf "paste: ~a\n" current-irc-connection) (for ([c irc-channels]) (irc-send-message current-irc-connection c msg)))