summaryrefslogtreecommitdiff
path: root/git-recover-repository.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-10-23 12:58:01 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-10-23 13:00:45 -0400
commitb77b0848ee28093b63e3ab0d1ea494e430ffe58b (patch)
tree7bcc235a07319bb4461373b5d0656ddc90aad357 /git-recover-repository.hs
parentfb2ccfd60ff09c1b1d03838d42eba3c65fd7fb27 (diff)
repair command: add handling of git-annex branch and index
Diffstat (limited to 'git-recover-repository.hs')
-rw-r--r--git-recover-repository.hs4
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
)