diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2025-11-30 21:53:49 +0100 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2025-12-01 21:52:51 +0100 |
| commit | 41b2081f57e8356fe26f67f819af480d10219d25 (patch) | |
| tree | 04a61ab4ea3b753114cd63739e9e4fd3b0bf8c8f /src | |
| parent | 7d592af7d3a29f492b2d62bc5ac8b5c67b2bc83c (diff) | |
Align TUI status symbols for previous and current jobs
Diffstat (limited to 'src')
| -rw-r--r-- | src/Command/Run.hs | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/Command/Run.hs b/src/Command/Run.hs index 3bdfb4e..7b34757 100644 --- a/src/Command/Run.hs +++ b/src/Command/Run.hs @@ -395,20 +395,20 @@ fitToLength maxlen str | len <= maxlen = str <> T.replicate (maxlen - len) " " showStatus :: Bool -> JobStatus a -> Text showStatus blink = \case - JobQueued -> "\ESC[94m…\ESC[0m " + JobQueued -> " \ESC[94m…\ESC[0m " JobWaiting uses -> "\ESC[94m~" <> fitToLength 6 (T.intercalate "," (map textJobName uses)) <> "\ESC[0m" - JobSkipped -> "\ESC[0m-\ESC[0m " - JobRunning -> "\ESC[96m" <> (if blink then "*" else "•") <> "\ESC[0m " + JobSkipped -> " \ESC[0m-\ESC[0m " + JobRunning -> " \ESC[96m" <> (if blink then "*" else "•") <> "\ESC[0m " JobError fnote -> "\ESC[91m" <> fitToLength 7 ("!! [" <> T.pack (maybe "?" (show . tfNumber) (footnoteTerminal fnote)) <> "]") <> "\ESC[0m" - JobFailed -> "\ESC[91m✗\ESC[0m " - JobCancelled -> "\ESC[0mC\ESC[0m " - JobDone _ -> "\ESC[92m✓\ESC[0m " + JobFailed -> " \ESC[91m✗\ESC[0m " + JobCancelled -> " \ESC[0mC\ESC[0m " + JobDone _ -> " \ESC[92m✓\ESC[0m " JobDuplicate _ s -> case s of - JobQueued -> "\ESC[94m^\ESC[0m " - JobWaiting _ -> "\ESC[94m^\ESC[0m " - JobSkipped -> "\ESC[0m-\ESC[0m " - JobRunning -> "\ESC[96m" <> (if blink then "*" else "^") <> "\ESC[0m " + JobQueued -> " \ESC[94m^\ESC[0m " + JobWaiting _ -> " \ESC[94m^\ESC[0m " + JobSkipped -> " \ESC[0m-\ESC[0m " + JobRunning -> " \ESC[96m" <> (if blink then "*" else "^") <> "\ESC[0m " _ -> showStatus blink s JobPreviousStatus (JobDone _) -> "\ESC[90m«\ESC[32m✓\ESC[0m " |