diff options
| author | Joey Hess <joeyh@joeyh.name> | 2022-05-04 11:40:38 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2022-05-04 11:43:20 -0400 |
| commit | c244daa32328f478bbf38a79f2fcacb138a1049f (patch) | |
| tree | f1b2691357b88b267b9a77d5db23213bf0e2ac79 /Git/Command.hs | |
| parent | 3c9630388ab0234df9e13473ac20c147e77074c5 (diff) | |
| download | git-repair-c244daa32328f478bbf38a79f2fcacb138a1049f.tar.gz | |
merge from git-annex
Diffstat (limited to 'Git/Command.hs')
| -rw-r--r-- | Git/Command.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Command.hs b/Git/Command.hs index 2358b17..894f6ae 100644 --- a/Git/Command.hs +++ b/Git/Command.hs @@ -39,7 +39,7 @@ runBool params repo = assertLocal repo $ run :: [CommandParam] -> Repo -> IO () run params repo = assertLocal repo $ unlessM (runBool params repo) $ - error $ "git " ++ show params ++ " failed" + giveup $ "git " ++ show params ++ " failed" {- Runs git and forces it to be quiet, throwing an error if it fails. -} runQuiet :: [CommandParam] -> Repo -> IO () |