bring back the (checksum) when fscking

This is useful because it shows users which files it checksums, vs ones
that are not present, or don't use a hash backend, or --fast
This commit is contained in:
Joey Hess 2014-02-20 16:06:51 -04:00
parent 638ee732b4
commit c3d2d371ee
Failed to extract signature

View file

@ -101,6 +101,7 @@ checkKeyChecksum hash key file = do
case (mstat, fast) of
(Just stat, False) -> do
let filesize = fromIntegral $ fileSize stat
showSideAction "checksum"
check <$> hashFile hash file filesize
_ -> return True
where