X-Git-Url: https://git.martlubbers.net/?p=cloogle-irc.git;a=blobdiff_plain;f=cloogleirc.icl;h=596f8c47e06c1e7b67707aa2b8a20b006004e4d3;hp=69be8397d64c33130df334a1b2b0ee7b84554614;hb=cd75fc36319812f7f36d29719596950abdb3895a;hpb=93f0540991809d459cfc3061c88fc07d1cfc948c diff --git a/cloogleirc.icl b/cloogleirc.icl index 69be839..596f8c4 100644 --- a/cloogleirc.icl +++ b/cloogleirc.icl @@ -173,7 +173,7 @@ Start w | m == "!restart" = (Nothing, w) | m.[0] == '!' # (msgs, w) = realProcess (split " " $ m % (1, size m)) w - = (Just $ map (PRIVMSG recipient) msgs, w) + = (Just $ map (NOTICE recipient) msgs, w) = (Just [], w) where recipient = case (\(CSepList [t:_]) -> t.[0]) t of