diff options
| -rw-r--r-- | Omni/Bild.hs | 10 | ||||
| -rw-r--r-- | Omni/Log/Concurrent.hs | 2 |
2 files changed, 6 insertions, 6 deletions
diff --git a/Omni/Bild.hs b/Omni/Bild.hs index cfc8168..773aaba 100644 --- a/Omni/Bild.hs +++ b/Omni/Bild.hs @@ -1139,8 +1139,8 @@ test loud Target {..} = cmd = root </> outToPath out, args = ["test"], ns = namespace, - onFailure = Log.fail ["test", nschunk namespace] >> Log.br, - onSuccess = Log.pass ["test", nschunk namespace] >> Log.br + onFailure = loud ?: (Log.fail ["test", nschunk namespace] >> Log.br, LogC.updateLineState namespace LogC.Failed), + onSuccess = loud ?: (Log.pass ["test", nschunk namespace] >> Log.br, LogC.updateLineState namespace LogC.Success) } |> run CPython -> @@ -1149,8 +1149,8 @@ test loud Target {..} = cmd = root </> outToPath out, args = ["test"], ns = namespace, - onFailure = Log.fail ["test", nschunk namespace] >> Log.br, - onSuccess = Log.pass ["test", nschunk namespace] >> Log.br + onFailure = loud ?: (Log.fail ["test", nschunk namespace] >> Log.br, LogC.updateLineState namespace LogC.Failed), + onSuccess = loud ?: (Log.pass ["test", nschunk namespace] >> Log.br, LogC.updateLineState namespace LogC.Success) } |> run _ -> @@ -1312,7 +1312,7 @@ logs ns src = ( ByteString.filter (/= BSI.c2w '\n') .> decodeUtf8 .> Text.take (columns - 1) - .> (<> "…") + .> (<> "...") .> LogC.updateLine ns .> liftIO ) diff --git a/Omni/Log/Concurrent.hs b/Omni/Log/Concurrent.hs index f61eb2e..93f90c1 100644 --- a/Omni/Log/Concurrent.hs +++ b/Omni/Log/Concurrent.hs @@ -228,7 +228,7 @@ updateLineState ns buildState = do Success -> ("✓", fore green) Failed -> ("x", fore red) Analyzing -> ("+", identity) - Pending -> ("…", identity) + Pending -> (".", identity) Building -> ("~", identity) let msg = "[" <> symbol <> "] " <> nsText let truncated = truncateToWidth (tiWidth lmTermInfo - 1) msg |