From 5ca0a07ddfebb74e5556901fe6f761dfd8c06a8b Mon Sep 17 00:00:00 2001
From: Frank Duncan <frank@kank.net>
Date: Wed, 15 Dec 2021 14:17:31 -0600
Subject: [PATCH] Update date/time format to include zeroes correctly

---
 src/main/cli.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/main/cli.lisp b/src/main/cli.lisp
index 8afc840..c7a079e 100644
--- a/src/main/cli.lisp
+++ b/src/main/cli.lisp
@@ -8,7 +8,7 @@
 (defun job-info->line (job-info)
  (format nil "~A (~A) ~A"
   (subseq (first job-info) 0 8)
-  (format nil "~{~A/~A/~A ~A:~A~}"
+  (format nil "~{~2,,,'0@A/~2,,,'0@A/~A ~2,,,'0@A:~2,,,'0@A~}"
    (utils:time-as-list (third job-info) :month :date :year :hr :min))
   (case (second job-info)
    (:succeeded (format nil "~c[1;32mPassed~c[0m" #\Esc #\Esc))
-- 
2.25.1