Merge branch 'master' into assistant
This commit is contained in:
commit
cfccfc19e0
1 changed files with 4 additions and 2 deletions
|
@ -10,8 +10,10 @@ module Git.Merge where
|
|||
import Common
|
||||
import Git
|
||||
import Git.Command
|
||||
import Git.Version
|
||||
|
||||
{- Avoids recent git's interactive merge. -}
|
||||
mergeNonInteractive :: Ref -> Repo -> IO Bool
|
||||
mergeNonInteractive branch = runBool "merge"
|
||||
[Param "--no-edit", Param $ show branch]
|
||||
mergeNonInteractive branch
|
||||
| older "1.7.7.6" = runBool "merge" [Param $ show branch]
|
||||
| otherwise = runBool "merge" [Param "--no-edit", Param $ show branch]
|
||||
|
|
Loading…
Add table
Reference in a new issue