diff options
Diffstat (limited to 'Git/RecoverRepository.hs')
| -rw-r--r-- | Git/RecoverRepository.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/RecoverRepository.hs b/Git/RecoverRepository.hs index 0563c636b..f591bd6b2 100644 --- a/Git/RecoverRepository.hs +++ b/Git/RecoverRepository.hs @@ -48,7 +48,7 @@ import Data.Tuple.Utils - To remove corrupt objects, unpack all packs, and remove the packs - (to handle corrupt packs), and remove loose object files. -} -cleanCorruptObjects :: Maybe MissingObjects -> Repo -> IO MissingObjects +cleanCorruptObjects :: FsckResults -> Repo -> IO MissingObjects cleanCorruptObjects mmissing r = check mmissing where check Nothing = do |