We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent d701441 commit ab73bc9Copy full SHA for ab73bc9
src/Spago/Git.hs
@@ -29,7 +29,11 @@ hasCleanWorkingTree = do
29
logDebug $ "git status stderr: " <> display err
30
die [ "Unable to check git status. Perhaps git is not installed or this is not a git repository?" ]
31
32
- pure $ out == ""
+ if out == ""
33
+ then pure True
34
+ else do
35
+ logDebug $ "Git working tree is not clean: " <> displayShow out
36
+ pure False
37
38
39
getAllTags :: HasGit env => RIO env [Text]
0 commit comments