Create git module as basis for further work.

This commit is contained in:
Robin Heggelund Hansen 2021-12-21 16:10:03 +01:00
parent b7b27e23e0
commit aeeda475e9
2 changed files with 17 additions and 0 deletions

16
builder/src/Git.hs Normal file
View File

@ -0,0 +1,16 @@
module Git
( checkInstalledGit
)
where
import System.Directory (findExecutable)
checkInstalledGit :: IO Bool
checkInstalledGit = do
gitPath <- findExecutable "git"
return $ case gitPath of
Just _ -> True
Nothing -> False

View File

@ -85,6 +85,7 @@ Executable gren
File
Generate
Http
Git
Reporting
Reporting.Exit
Reporting.Exit.Help