Sort completed subagents above active ones

1 files changed, 21 insertions, 0 deletions

diff --git a/spec/test_progress.lua b/spec/test_progress.lua
index 3c1ea33..79570c1 100644
--- a/spec/test_progress.lua
+++ b/spec/test_progress.lua
@@ -204,6 +204,27 @@ return {
         progress.reset()
     end },
 
+    { "finished cards sort above running cards in creation order", function()
+        progress.reset()
+        local component = board("call-sorting", true)
+        local alpha = progress.card("alpha", "a")
+        local beta = progress.card("beta", "b")
+        local gamma = progress.card("gamma", "c")
+        local delta = progress.card("delta", "d")
+
+        gamma:done("completed")
+        alpha:done("completed")
+        delta:done("failed", "boom")
+
+        local text = plain(component:render(80))
+        local alpha_at = assert(text:find("alpha", 1, true))
+        local gamma_at = assert(text:find("gamma", 1, true))
+        local delta_at = assert(text:find("delta", 1, true))
+        local beta_at = assert(text:find("beta", 1, true))
+        assert(alpha_at < gamma_at and gamma_at < delta_at and delta_at < beta_at, text)
+        progress.reset()
+    end },
+
     { "Ctrl+O state expands and recollapses every existing board", function()
         progress.reset()
         local first = board("call-a", true)