c76aecc93001 default tip

--- a/stumpwm/tasks.lisp	Thu Jul 16 11:08:03 2026 -0400
+++ b/stumpwm/tasks.lisp	Thu Jul 16 11:24:25 2026 -0400
@@ -1,7 +1,7 @@
 (in-package :stumpwm-user)
 
 (defun parse-task-line (line)
-  (ppcre:register-groups-bind (id task) ("^([a-f0-9]+) - (.*)$" line)
+  (ppcre:register-groups-bind (id task) ("^([a-f0-9]+) +- (.*)$" line)
     (cons id task)))
 
 
@@ -9,7 +9,9 @@
   (sh `("t" ,task) :wait nil))
 
 (defun tasks/list% ()
-  (mapcar #'parse-task-line (sh '("t") :result-type 'list)))
+  (_ (sh '("t") :result-type 'list)
+    (mapcar #'parse-task-line _)
+    (sort _ #'string-lessp :key #'cdr)))
 
 (defun tasks/finish% (id)
   (sh `("t" "-f" ,id) :wait nil))