{-# LANGUAGE TemplateHaskell #-}
module HMGit.Development (
    gitCfg
) where

import           HMGit.Development.TH
import           HMGit.Internal.Core.Runner (HMGitConfig (..))

import           Path                       (Abs, Dir, mkAbsDir)

gitCfg :: HMGitConfig
gitCfg :: HMGitConfig
gitCfg = HMGitConfig :: Path Abs Dir -> Int -> HMGitConfig
HMGitConfig {
    hmGitDir :: Path Abs Dir
hmGitDir = $(mkAbsDir $(relativeProjRoot ".git"))
  , hmGitTreeLimit :: Int
hmGitTreeLimit = Int
1000
  }