Skip to content

Commit e1e81ca

Browse files
author
Andres Schmois
committed
Make hlint happy
1 parent d6a6f52 commit e1e81ca

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Stack/Build/Source.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -496,7 +496,7 @@ getFileDigestMaybe fp =
496496
-- | Create FileCacheInfo for a file.
497497
calcFci :: MonadIO m => (FileSize,SHA256) -> FilePath -> m FileCacheInfo
498498
calcFci (size, digest) fp = liftIO $ do
499-
modTime' <- fmap modificationTime $ getFileStatus fp
499+
modTime' <- modificationTime <$> getFileStatus fp
500500
return FileCacheInfo
501501
{ fciModTime = modTime'
502502
, fciSize = size

0 commit comments

Comments
 (0)