X-Git-Url: https://git.martlubbers.net/?p=cloogle-irc.git;a=blobdiff_plain;f=cloogleirc.icl;h=3f0ac5504288cf3c9247ed931ef0ef1d08f043ab;hp=300497ee3adbb21220b1d2ceccf903e279e8f22a;hb=0ccf6e4772c240fb79d58f8b4d833a23e278e297;hpb=5855016259a3e87c3707573b1c3c843b6365a038 diff --git a/cloogleirc.icl b/cloogleirc.icl index 300497e..3f0ac55 100644 --- a/cloogleirc.icl +++ b/cloogleirc.icl @@ -181,7 +181,7 @@ Start w (Nothing, w) = (Nothing, io, w) (Just cs, w) # msgs = map toPrefix cs - #! (io, w) = foldr (log strf " (s): ") (io, w) msgs +// #! (io, w) = foldr (log strf " (s): ") (io, w) msgs = (Just msgs, io, w) log :: String String IRCMessage (!*File, !*World) -> (!*File, !*World)