diff options
author | Joey Hess <joeyh@joeyh.name> | 2017-03-02 14:09:42 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2017-03-02 14:09:42 -0400 |
commit | d7d27ae4bb6ef2e421545c59209fdf4576b4be3b (patch) | |
tree | ed43ccb8f142d480fce4059ccd56dde60a038088 /Command/Status.hs | |
parent | 544e6792d712f2e90e25776b3761e1c6d32e3059 (diff) |
status: Propigate nonzero exit code from git status.
Diffstat (limited to 'Command/Status.hs')
-rw-r--r-- | Command/Status.hs | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Command/Status.hs b/Command/Status.hs index 2e6b9f44a..07024f3c8 100644 --- a/Command/Status.hs +++ b/Command/Status.hs @@ -47,8 +47,10 @@ start o locs = do , return $ \s -> pure (Just s) ) forM_ l $ \s -> maybe noop displayStatus =<< getstatus s - void $ liftIO cleanup - stop + ifM (liftIO cleanup) + ( stop + , giveup "git status failed" + ) where ps = case ignoreSubmodules o of Nothing -> [] |