Rename timer-list to list-timers
* doc/emacs/anti.texi (Antinews): * doc/lispref/os.texi (Timers): * etc/NEWS: * lisp/emacs-lisp/timer-list.el: (timer-list-mode): Rename timer-list to list-timers.
This commit is contained in:
parent
a5fec62b51
commit
965cffd89c
4 changed files with 7 additions and 7 deletions
|
@ -94,7 +94,7 @@ happen. The variables @code{'attempt-stack-overflow-recovery} and
|
||||||
@code{attempt-orderly-shutdown-on-fatal-signal} are therefore removed.
|
@code{attempt-orderly-shutdown-on-fatal-signal} are therefore removed.
|
||||||
|
|
||||||
@item
|
@item
|
||||||
The @code{timer-list} command was removed, as we decided timers are
|
The @code{list-timers} command was removed, as we decided timers are
|
||||||
not user-level feature, and therefore users should not be allowed to
|
not user-level feature, and therefore users should not be allowed to
|
||||||
mess with them. Ask an Emacs Lisp guru near you for help if you have
|
mess with them. Ask an Emacs Lisp guru near you for help if you have
|
||||||
a runaway timer in your session. (Of course, as you move back in
|
a runaway timer in your session. (Of course, as you move back in
|
||||||
|
|
|
@ -1885,8 +1885,8 @@ one of these functions; the arrival of the specified time will not
|
||||||
cause anything special to happen.
|
cause anything special to happen.
|
||||||
@end defun
|
@end defun
|
||||||
|
|
||||||
@findex timer-list
|
@findex list-timers
|
||||||
The @code{timer-list} command lists all the currently active timers.
|
The @code{list-timers} command lists all the currently active timers.
|
||||||
There's only one command available in the buffer displayed: @kbd{c}
|
There's only one command available in the buffer displayed: @kbd{c}
|
||||||
(@code{timer-list-cancel}) that will cancel the timer on the line
|
(@code{timer-list-cancel}) that will cancel the timer on the line
|
||||||
under point.
|
under point.
|
||||||
|
|
2
etc/NEWS
2
etc/NEWS
|
@ -367,7 +367,7 @@ see the node "Connection Local Variables" in the ELisp manual.
|
||||||
puny.el library, so that one can visit Web sites with non-ASCII URLs.
|
puny.el library, so that one can visit Web sites with non-ASCII URLs.
|
||||||
|
|
||||||
+++
|
+++
|
||||||
** The new 'timer-list' command lists all active timers in a buffer,
|
** The new 'list-timers' command lists all active timers in a buffer,
|
||||||
where you can cancel them with the 'c' command.
|
where you can cancel them with the 'c' command.
|
||||||
|
|
||||||
+++
|
+++
|
||||||
|
|
|
@ -25,7 +25,7 @@
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun timer-list (&optional _ignore-auto _nonconfirm)
|
(defun list-timers (&optional _ignore-auto _nonconfirm)
|
||||||
"List all timers in a buffer."
|
"List all timers in a buffer."
|
||||||
(interactive)
|
(interactive)
|
||||||
(pop-to-buffer-same-window (get-buffer-create "*timer-list*"))
|
(pop-to-buffer-same-window (get-buffer-create "*timer-list*"))
|
||||||
|
@ -67,7 +67,7 @@
|
||||||
(goto-char (point-min)))
|
(goto-char (point-min)))
|
||||||
;; This command can be destructive if they don't know what they are
|
;; This command can be destructive if they don't know what they are
|
||||||
;; doing. Kids, don't try this at home!
|
;; doing. Kids, don't try this at home!
|
||||||
;;;###autoload (put 'timer-list 'disabled "Beware: manually canceling timers can ruin your Emacs session.")
|
;;;###autoload (put 'list-timers 'disabled "Beware: manually canceling timers can ruin your Emacs session.")
|
||||||
|
|
||||||
(defvar timer-list-mode-map
|
(defvar timer-list-mode-map
|
||||||
(let ((map (make-sparse-keymap)))
|
(let ((map (make-sparse-keymap)))
|
||||||
|
@ -84,7 +84,7 @@
|
||||||
(setq bidi-paragraph-direction 'left-to-right)
|
(setq bidi-paragraph-direction 'left-to-right)
|
||||||
(setq truncate-lines t)
|
(setq truncate-lines t)
|
||||||
(buffer-disable-undo)
|
(buffer-disable-undo)
|
||||||
(setq-local revert-buffer-function 'timer-list)
|
(setq-local revert-buffer-function #'list-timers)
|
||||||
(setq buffer-read-only t)
|
(setq buffer-read-only t)
|
||||||
(setq header-line-format
|
(setq header-line-format
|
||||||
(format "%4s %10s %8s %s"
|
(format "%4s %10s %8s %s"
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue