X-Git-Url: https://git.martlubbers.net/?p=cloogle-irc.git;a=blobdiff_plain;f=cloogle.icl;h=9d8b2dbfddc233143e429f307f758d5049dc7f96;hp=de1472485bfc20afe637a866a383c609673e0bcd;hb=aa96c27332a624f88b0031415374db8f5f6e71eb;hpb=7a2a0cc9ba44d6073ae1778b07738c8d425e9cb5;ds=sidebyside

diff --git a/cloogle.icl b/cloogle.icl
index de14724..9d8b2db 100644
--- a/cloogle.icl
+++ b/cloogle.icl
@@ -31,8 +31,8 @@ import TCPIP
 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