1
0
Fork 0

Remove debug lines

This commit is contained in:
Malte Brandy 2021-07-31 13:04:52 +02:00
parent 51b40ed2ab
commit 76f023fbbe
No known key found for this signature in database
GPG key ID: 226A2D41EF5378C9

View file

@ -20,8 +20,6 @@ let
isUnpushed gitDir = do
gitHead <- tryCmd (git "-C" gitDir "rev-parse" "HEAD")
origin <- tryCmd (git "-C" gitDir "rev-parse" "origin/HEAD")
say [i|#{gitDir :: FilePath}|]
say [i|head: #{gitHead}, origin: #{origin}|]
pure (gitHead /= origin)
tryCmd x = ignoreFailure x |> captureTrim