Skip to content

Commit 2ae047b

Browse files
author
Adam C. Foltzer
committed
Merge PR acfoltzer#2
2 parents 09f84a2 + 74b2e3d commit 2ae047b

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/Development/GitRev.hs

+2-2
Original file line numberDiff line numberDiff line change
@@ -108,8 +108,8 @@ gitDirty :: ExpQ
108108
gitDirty = do
109109
output <- runGit ["status", "--porcelain"] "" IdxUsed
110110
case output of
111-
"" -> conE $ mkName "Prelude.False"
112-
_ -> conE $ mkName "Prelude.True"
111+
"" -> conE falseName
112+
_ -> conE trueName
113113

114114
-- | Return the number of commits in the current head
115115
gitCommitCount :: ExpQ

0 commit comments

Comments
 (0)