fix --is-ancestor option
This commit is contained in:
parent
34eae54ff9
commit
13a6a20716
1 changed files with 1 additions and 1 deletions
|
@ -218,7 +218,7 @@ tree (Ref ref) = extractSha <$$> pipeReadStrict
|
||||||
isAncestor :: Ref -> Ref -> Repo -> IO Bool
|
isAncestor :: Ref -> Ref -> Repo -> IO Bool
|
||||||
isAncestor r1 r2 = runBool
|
isAncestor r1 r2 = runBool
|
||||||
[ Param "merge-base"
|
[ Param "merge-base"
|
||||||
, Param "--ancestor"
|
, Param "--is-ancestor"
|
||||||
, Param (fromRef r1)
|
, Param (fromRef r1)
|
||||||
, Param (fromRef r2)
|
, Param (fromRef r2)
|
||||||
]
|
]
|
||||||
|
|
Loading…
Reference in a new issue