diff options
| -rw-r--r-- | Backend/Hash.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Backend/Hash.hs b/Backend/Hash.hs index d46ce973e..41368a5bb 100644 --- a/Backend/Hash.hs +++ b/Backend/Hash.hs @@ -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 |