diff --git a/misc/config-publishing/async-proc-management.el b/misc/config-publishing/async-proc-management.el index 8d23224..238c11d 100644 --- a/misc/config-publishing/async-proc-management.el +++ b/misc/config-publishing/async-proc-management.el @@ -93,7 +93,9 @@ (apply #'format (format "%%s%%-%ds" (length (plist-get dep :padded-name))) (pcase (process-status (plist-get dep :proc)) ('run '("\033[0;33m" "Active")) - ('exit '("\033[0;32m" "Complete"))))) + ('exit '("\033[0;32m" "Complete")) + (_ '("\033[0;31m" (format "Unrecognised status %s" + (process-status (plist-get dep :proc)))))))) apm-dependent-processes " ") "\033[0;90m")