Set locale encoding in test suite.

This prevents a "commit buffer (invalid argument)" error on
Windows.
This commit is contained in:
John MacFarlane 2013-01-18 11:23:09 -08:00
parent 8eab759a9c
commit 809d74b86d

View file

@ -3,7 +3,7 @@
module Main where module Main where
import Test.Framework import Test.Framework
import GHC.IO.Encoding
import qualified Tests.Old import qualified Tests.Old
import qualified Tests.Readers.LaTeX import qualified Tests.Readers.LaTeX
import qualified Tests.Readers.Markdown import qualified Tests.Readers.Markdown
@ -34,4 +34,6 @@ tests = [ testGroup "Old" Tests.Old.tests
] ]
main :: IO () main :: IO ()
main = inDirectory "tests" $ defaultMain tests main = do
setLocaleEncoding utf8
inDirectory "tests" $ defaultMain tests