refine active process order on page

Termina · Mar 28, 2024 · c4ef51c · c4ef51c
1 parent d095971
commit c4ef51c
Show file tree

Hide file tree

Showing 2 changed files with 57 additions and 13 deletions.
diff --git a/calcit.cirru b/calcit.cirru
diff --git a/compact.cirru b/compact.cirru
@@ -503,9 +503,16 @@
                           filter $ fn (x)
                             not= (first x) (get router-data :enlarge-view)
                           .sort $ fn (x y)
-                            -
-                              :started-at $ last y
-                              :started-at $ last x
+                            if
+                              and
+                                :alive? $ last y
+                                :alive? $ last x
+                              -
+                                :started-at $ last x
+                                :started-at $ last y
+                              -
+                                :started-at $ last y
+                                :started-at $ last x
                           .sort-by $ fn (pair)
                             not $ :alive? (last pair)
                           .map-pair $ fn (pid process)