mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-06 22:41:06 -08:00
Code Issues Projects Releases Wiki Activity

Make list-timers do sub-second times

Browse source 
* lisp/emacs-lisp/timer-list.el (list-timers): Do sub-second times
(bug#39956).
This commit is contained in:
Lars Ingebrigtsen 2020-10-30 12:10:48 +01:00
parent 617f70bc7d
commit 02ecbf58e4
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/emacs-lisp/timer-list.el
View file

@ -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"))