fix build warning with time 1.5

This commit is contained in:
Joey Hess 2015-05-10 15:28:23 -04:00
parent 08308dc9b3
commit 33a2264546

View file

@ -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