summaryrefslogtreecommitdiff
path: root/Messages.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Messages.hs')
-rw-r--r--Messages.hs8
1 files changed, 0 insertions, 8 deletions
diff --git a/Messages.hs b/Messages.hs
index a49f20711..b62e6d2a7 100644
--- a/Messages.hs
+++ b/Messages.hs
@@ -31,7 +31,6 @@ module Messages (
showHeader,
showRaw,
setupConsole,
- setConsoleEncoding,
enableDebugOutput,
disableDebugOutput,
debugEnabled,
@@ -183,13 +182,6 @@ setupConsole = do
updateGlobalLogger rootLoggerName (setLevel NOTICE . setHandlers [s])
setConsoleEncoding
-{- This avoids ghc's output layer crashing on invalid encoded characters in
- - filenames when printing them out. -}
-setConsoleEncoding :: IO ()
-setConsoleEncoding = do
- fileEncoding stdout
- fileEncoding stderr
-
{- Log formatter with precision into fractions of a second. -}
preciseLogFormatter :: LogFormatter a
preciseLogFormatter = tfLogFormatter "%F %X%Q" "[$time] $msg"