From fe1da1f16884ea1e3b1c3faedbe336d94ee3a386 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Thu, 6 Nov 2025 20:54:41 +0100 Subject: Reuse job status and artifacts Changelog: Reuse job status and artifacts from previous runs --- src/Command/Run.hs | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'src/Command/Run.hs') diff --git a/src/Command/Run.hs b/src/Command/Run.hs index a80e15d..c4b92bb 100644 --- a/src/Command/Run.hs +++ b/src/Command/Run.hs @@ -381,6 +381,10 @@ showStatus blink = \case JobRunning -> "\ESC[96m" <> (if blink then "*" else "^") <> "\ESC[0m " _ -> showStatus blink s + JobPreviousStatus (JobDone _) -> "\ESC[90m«\ESC[32m✓\ESC[0m " + JobPreviousStatus (JobFailed) -> "\ESC[90m«\ESC[31m✗\ESC[0m " + JobPreviousStatus s -> "\ESC[90m«" <> T.init (showStatus blink s) + displayStatusLine :: TerminalOutput -> TerminalLine -> Text -> Text -> [ Maybe (TVar (JobStatus JobOutput)) ] -> IO () displayStatusLine tout line prefix1 prefix2 statuses = do go "\0" -- cgit v1.2.3