Permalink
Browse files

Maybe fix build on GHC 7.4.1

  • Loading branch information...
1 parent 555b617 commit 7755c6ef1c443737006ff5a4a8bf374a00b77bca @willdonnelly committed Oct 27, 2012
Showing with 2 additions and 1 deletion.
  1. +2 −1 Config/Dyre/Paths.hs
View
@@ -33,9 +33,10 @@ getPaths params@Params{projectName = pName} = do
-- | Check if a file exists. If it exists, return Just the modification
-- time. If it doesn't exist, return Nothing.
-maybeModTime :: FilePath -> IO (Maybe UTCTime)
maybeModTime path = do
fileExists <- doesFileExist path
if fileExists
then fmap Just $ getModificationTime path
else return Nothing
+-- Removed type signature because it can't satisfy GHC 7.4 and 7.6 at once
+-- maybeModTime :: FilePath -> IO (Maybe UTCTime)

0 comments on commit 7755c6e

Please sign in to comment.