whitespace fix

This commit is contained in:
Joey Hess 2012-12-13 00:46:30 -04:00
parent ffdd08fd2e
commit cfe354eccd

View file

@ -126,7 +126,7 @@ removeCache key = withCacheFile key nukeFile
{- Cache a file's inode, size, and modification time to determine if it's {- Cache a file's inode, size, and modification time to determine if it's
- been changed. -} - been changed. -}
data Cache = Cache FileID FileOffset EpochTime data Cache = Cache FileID FileOffset EpochTime
deriving (Eq, Show) deriving (Eq, Show)
showCache :: Cache -> String showCache :: Cache -> String
showCache (Cache inode size mtime) = unwords showCache (Cache inode size mtime) = unwords