Set timezone in ./tests/test.hs to UTC
authorJoachim Breitner <mail@joachim-breitner.de>
Fri, 18 Apr 2014 18:25:42 +0000 (18:25 +0000)
committerJoachim Breitner <mail@joachim-breitner.de>
Fri, 18 Apr 2014 18:25:42 +0000 (18:25 +0000)
tests/test.hs

index d65c441..fb283b3 100644 (file)
@@ -11,12 +11,15 @@ import Control.Monad
 import Control.Exception
 import Data.Typeable
 import System.Exit
+import System.Posix.Env
 
 import Categorize
 import TimeLog
 import Data
 
-main = defaultMain tests
+main = do
+    putEnv "TZ=UTC" -- to make tests reproducible
+    defaultMain tests
 
 tests :: TestTree
 tests = testGroup "Tests" [goldenTests, regressionTests]