master 02ecbf5 2/2: Make list-timers do sub-second times

[Lars Ingebrigtsen]

branch: master
commit 02ecbf58e460e2d63f489d8e348f3d7d58acee04
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Make list-timers do sub-second times
    
    * lisp/emacs-lisp/timer-list.el (list-timers): Do sub-second times
    (bug#39956).
---
 lisp/emacs-lisp/timer-list.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/timer-list.el b/lisp/emacs-lisp/timer-list.el
index 725ca31..4bda9ac 100644
--- a/lisp/emacs-lisp/timer-list.el
+++ b/lisp/emacs-lisp/timer-list.el
@@ -50,7 +50,7 @@
                                  (aref timer 2)
                                  (aref timer 3))))
                   (format "%12s"
-                          (format-seconds "%dd %hh %mm %z%ss"
+                          (format-seconds "%dd %hh %mm %z%,1ss"
                                          (float-time
                                           (if (aref timer 7)
                                               time
@@ -61,7 +61,8 @@
                  (cond
                   ((numberp repeat)
                    (propertize
-                    (format "%12s" (format-seconds "%dd %hh %mm %z%ss" repeat))
+                    (format "%12s" (format-seconds
+                                    "%dd %hh %mm %z%,1ss" repeat))
                     'help-echo "Repeat interval"))
                   ((null repeat)
                    (propertize "           -" 'help-echo "Runs once"))