module GitHUD.Git.Common (
  gitRemoteTrackingConfigKey
  , gitRemoteBranchConfigKey
  , mergeBaseDiffFromTo
  ) where


gitRemoteTrackingConfigKey :: String -> String
gitRemoteTrackingConfigKey :: String -> String
gitRemoteTrackingConfigKey String
localBranchName = String
"branch." String -> String -> String
forall a. [a] -> [a] -> [a]
++ String
localBranchName String -> String -> String
forall a. [a] -> [a] -> [a]
++ String
".remote"

gitRemoteBranchConfigKey :: String -> String
gitRemoteBranchConfigKey :: String -> String
gitRemoteBranchConfigKey String
localBranchName = String
"branch." String -> String -> String
forall a. [a] -> [a] -> [a]
++ String
localBranchName String -> String -> String
forall a. [a] -> [a] -> [a]
++ String
".merge"

mergeBaseDiffFromTo :: String -> String -> String
mergeBaseDiffFromTo :: String -> String -> String
mergeBaseDiffFromTo String
fromCommit String
toCommit = String
fromCommit String -> String -> String
forall a. [a] -> [a] -> [a]
++ String
"..." String -> String -> String
forall a. [a] -> [a] -> [a]
++ String
toCommit