diff options
Diffstat (limited to 'Command/Fsck.hs')
-rw-r--r-- | Command/Fsck.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index a17662d62..f27f18e57 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -329,7 +329,7 @@ checkKeySizeOr bad key file = case Types.Key.keySize key of checkBackend :: Backend -> Key -> Maybe FilePath -> Annex Bool checkBackend backend key mfile = go =<< isDirect where - go False = do + go False = do content <- calcRepo $ gitAnnexLocation key checkBackendOr badContent backend key content go True = maybe nocheck checkdirect mfile |