@@ -24,7 +24,7 @@ import Filesystem (isFile)
25-- | Get current time
25-- | Get current time
26epochTime :: IO Tar.EpochTime
26epochTime :: IO Tar.EpochTime
27−epochTime = (\(CTime t) -> t) <$> PC.epochTime
27+epochTime = (\(CTime t) -> fromIntegral t) <$> PC.epochTime
29-- | All package/versions in a build plan, including core packages.
29-- | All package/versions in a build plan, including core packages.