remove submodules'
[cloogle-irc.git] / cloogle.icl
index de14724..9d8b2db 100644 (file)
@@ -31,8 +31,8 @@ import TCPIP
 commands :: [String]
 commands = map toString
        [NICK "clooglebot" Nothing
 commands :: [String]
 commands = map toString
        [NICK "clooglebot" Nothing
-       ,USER "cloogle" "0" "Cloogle bot"
-       ,JOIN [("#cloogle", Nothing)]
+       ,USER "cloogle" "0" "cloogle" "Cloogle bot"
+       ,JOIN (CSepList ["#cloogle"])
        ]
 
 TIMEOUT :== Just 10000
        ]
 
 TIMEOUT :== Just 10000