aelve/guide
1
1
Fork 0
mirror of https://github.com/aelve/guide.git synced 2024-11-27 18:12:44 +03:00
Code Issues Projects Releases Wiki Activity

Revert forcing to encode UTF-8

Browse Source
This commit is contained in:
Jens Krause 2017-10-09 09:28:43 +02:00
parent 2d01de8a74
commit 55b3dd7725
No known key found for this signature in database
GPG Key ID: 3B2FAFBCEFA5906D
2 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Guide/Main.hs
View File

@ -53,7 +53,6 @@ import Data.Serialize.Get as Cereal
-- IO
import System.IO
import qualified SlaveThread as Slave
import GHC.IO.Encoding (setLocaleEncoding, utf8)
-- Catching signals
import System.Posix.Signals
-- Watching the templates directory
@ -137,8 +136,6 @@ lucidWithConfig x = do
-- | Start the site.
main :: IO ()
main = do
-- force to use UTF-8
setLocaleEncoding utf8
config <- readConfig
mainWith config

3
tests/Main.hs
View File

@ -5,7 +5,6 @@
module Main (main) where
import BasePrelude
import GHC.IO.Encoding (setLocaleEncoding, utf8)
-- Testing
import Test.Hspec
@ -17,8 +16,6 @@ import qualified MergeSpec
main :: IO ()
main = do
-- force to use UTF-8
setLocaleEncoding utf8
hspec $ do
MarkdownSpec.tests
MergeSpec.tests