summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/timer-list.el
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2020-11-07 16:21:36 +0100
committerAndrea Corallo <akrl@sdf.org>2020-11-07 16:21:36 +0100
commit75e8ee728fdda91a9eca7f3db24b639e8036f7e4 (patch)
treeef7381399099137d44aba924de40d1fb8834331d /lisp/emacs-lisp/timer-list.el
parent6c271ffaa808c602e177db4bd2297ff81112147e (diff)
parente8f5657bc7f6e0e45f70e4849736c6e87d44a1ac (diff)
downloademacs-75e8ee728fdda91a9eca7f3db24b639e8036f7e4.tar.gz
emacs-75e8ee728fdda91a9eca7f3db24b639e8036f7e4.tar.bz2
emacs-75e8ee728fdda91a9eca7f3db24b639e8036f7e4.zip
Merge remote-tracking branch 'savannah/master' into HEAD
Diffstat (limited to 'lisp/emacs-lisp/timer-list.el')
-rw-r--r--lisp/emacs-lisp/timer-list.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/timer-list.el b/lisp/emacs-lisp/timer-list.el
index 4bda9acebf7..024f0030629 100644
--- a/lisp/emacs-lisp/timer-list.el
+++ b/lisp/emacs-lisp/timer-list.el
@@ -95,8 +95,8 @@
(setq-local revert-buffer-function #'list-timers)
(setq tabulated-list-format
'[("Idle" 6 timer-list--idle-predicate)
- (" Next" 12 timer-list--next-predicate)
- (" Repeat" 12 timer-list--repeat-predicate)
+ ("Next" 12 timer-list--next-predicate :right-align t :pad-right 1)
+ ("Repeat" 12 timer-list--repeat-predicate :right-align t :pad-right 1)
("Function" 10 timer-list--function-predicate)]))
(defun timer-list--idle-predicate (A B)
@@ -121,7 +121,7 @@
(string< rA rB)))
(defun timer-list--function-predicate (A B)
- "Predicate to sort Timer-List by the Next column."
+ "Predicate to sort Timer-List by the Function column."
(let ((fA (aref (cadr A) 3))
(fB (aref (cadr B) 3)))
(string< fA fB)))