diff --git a/Git/Ref.hs b/Git/Ref.hs index fd7d2da0c8..2767ae339c 100644 --- a/Git/Ref.hs +++ b/Git/Ref.hs @@ -218,7 +218,7 @@ tree (Ref ref) = extractSha <$$> pipeReadStrict isAncestor :: Ref -> Ref -> Repo -> IO Bool isAncestor r1 r2 = runBool [ Param "merge-base" - , Param "--ancestor" + , Param "--is-ancestor" , Param (fromRef r1) , Param (fromRef r2) ]