fix build warning with time 1.5
This commit is contained in:
parent
08308dc9b3
commit
33a2264546
1 changed files with 4 additions and 0 deletions
|
@ -18,4 +18,8 @@ import System.Locale
|
|||
import Common
|
||||
|
||||
parsePOSIXTime :: String -> Maybe POSIXTime
|
||||
#if MIN_VERSION_time(1,5,0)
|
||||
parsePOSIXTime s = utcTimeToPOSIXSeconds <$> parseTimeM True defaultTimeLocale "%s%Qs" s
|
||||
#else
|
||||
parsePOSIXTime s = utcTimeToPOSIXSeconds <$> parseTime defaultTimeLocale "%s%Qs" s
|
||||
#endif
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue