fix type check failure (Int32 vs Int64)
commit680bd1c2a210e43df5180464c9dfd95e8de3e63b
authorSimon Bergot <sbergot@talentsoft.com>
dateMon 15 Dec 2014, 11:16 (12 years ago)
parent3149d3a
Stackage/ServerBundle.hs+1−1
@@ -24,7 +24,7 @@ import Filesystem (isFile)
2424
2525-- | Get current time
2626epochTime :: IO Tar.EpochTime
27−epochTime = (\(CTime t) -> t) <$> PC.epochTime
27+epochTime = (\(CTime t) -> fromIntegral t) <$> PC.epochTime
2828
2929-- | All package/versions in a build plan, including core packages.
3030--