From c244daa32328f478bbf38a79f2fcacb138a1049f Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 4 May 2022 11:40:38 -0400 Subject: merge from git-annex --- Git/Command.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Git/Command.hs') 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 () -- cgit v1.2.3