Merge branch 'interface-improvements' of github.com:clean-cloogle/clean-irc into...

[cloogle-irc.git] / IRC.icl

diff --git a/IRC.icl b/IRC.icl
index 266531a..d0a0098 100644 (file)
--- a/IRC.icl
+++ b/IRC.icl
@@ -132,7 +132,7 @@ instance toString IRCUser where
        toString m = m.irc_nick <+ maybe "" ((<+) "!") m.irc_user
                <+ maybe "" ((<+) "@") m.irc_host
 instance toString IRCCommand where
-       toString m = jon " " (gIRCPrint{|*|} m)
+       toString m = jon " " (gIRCPrint{|*|} m) +++ "\r\n"
 instance toString IRCReplies where toString r = printToString r
 instance toString IRCErrors where toString r = printToString r