no unsafeIO

src/Gargantext/Parsers/Date.hs

@@ -145,7 +145,7 @@ parseTimeZone = do
         m <- wrapDST =<< (many1 $ anyChar)
         let (TimeZone _ s n) = unsafePerformIO getCurrentTimeZone
         let timeInMinute = if sign == '+' then h * 60 + m else -h * 60 - m
-         in return $ TimeZone timeInMinute s n
+         in return $ TimeZone timeInMinute False "CET"
 
 -- | Parser which use parseGregorian, parseTimeOfDay and parseTimeZone to create a ZonedTime
 parseZonedTime :: Parser ZonedTime