12 Sep
2012
12 Sep
'12
2:28 a.m.
On Wed, Sep 12, 2012 at 07:04:18AM +0100, Ganesh Sittampalam wrote:
The replacement is something like:
t <- getModificationTime path return $! fromInteger $ floor $ t `diffUTCTime` UTCTime (fromGregorian 1970 1 1) 0
Not sure if it makes any difference, but I use: floor . utcTimeToPOSIXSeconds <$> getModificationTime path Cheers, Simon