diff options
Diffstat (limited to 'git-recover-repository.hs')
| -rw-r--r-- | git-recover-repository.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/git-recover-repository.hs b/git-recover-repository.hs index 9f1ffb423..556e2a39b 100644 --- a/git-recover-repository.hs +++ b/git-recover-repository.hs @@ -12,7 +12,7 @@ import Common import qualified Git import qualified Git.CurrentRepo import qualified Git.Fsck -import qualified Git.RecoverRepository +import qualified Git.Repair import qualified Git.Config import qualified Git.Branch @@ -35,7 +35,7 @@ main = do forced <- parseArgs g <- Git.Config.read =<< Git.CurrentRepo.get - ifM (Git.RecoverRepository.runRecovery forced g) + ifM (fst <$> Git.Repair.runRepair forced g) ( exitSuccess , exitFailure ) |