diff options
| author | Ben Sima <ben@bensima.com> | 2025-11-26 16:23:09 -0500 |
|---|---|---|
| committer | Ben Sima <ben@bensima.com> | 2025-11-26 16:23:09 -0500 |
| commit | 8cec0e6e9dd952bce17db8e5d749ba504c7faa43 (patch) | |
| tree | 1f513936c2314ebb236132915c9c9b3380934414 | |
| parent | 3d7994bcaa30e0bae9d2ebea44eaeb35397063c3 (diff) | |
Replace unicode ellipsis with ASCII to fix xterm parsing
The ellipsis character (…, code 8230) was causing xterm.js parsing
errors in the jr worker terminal. Replace with ASCII alternatives.
| -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 |