diff options
Diffstat (limited to '')
| -rw-r--r-- | Hsbot/Utils.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Hsbot/Utils.hs b/Hsbot/Utils.hs index b84b028..a58fd0c 100644 --- a/Hsbot/Utils.hs +++ b/Hsbot/Utils.hs @@ -34,9 +34,9 @@ traceM :: String -> IrcBot () traceM msg = liftIO $ trace msg -- | Logs an error message -error :: String -> IO () -error msg = trace $ inColor msg [31] +traceRed :: String -> IO () +traceRed msg = trace $ inColor msg [31] -errorM :: String -> a () -error msg = liftIO $ error msg +errorM :: String -> IrcBot () +errorM msg = liftIO $ traceRed msg |