propellor spin

This commit is contained in:
Joey Hess 2014-04-11 01:53:37 -04:00
parent a57022deb8
commit ba6e87cde9
Failed to extract signature
1 changed files with 1 additions and 1 deletions

View File

@ -61,7 +61,7 @@ setLastChecked time desc = do
readLastChecked :: IO (M.Map Desc LocalTime)
readLastChecked = fromMaybe M.empty <$> catchDefaultIO Nothing go
where
go = readish <$> readFile lastCheckedFile
go = readish <$> readFileStrict lastCheckedFile
writeLastChecked :: M.Map Desc LocalTime -> IO ()
writeLastChecked = writeFile lastCheckedFile . show