mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(cancel-function-timers): Renamed from spurious duplicate

Browse source 
definition of cancel-timer.
This commit is contained in:
Richard M. Stallman 1993-05-29 20:43:41 +00:00
parent 6f139a456c
commit 046c6887bc
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/timer.el
View file

@ -128,9 +128,9 @@ will happen at the specified time."
;; Used to set timer-scratch to "", but nothing uses that var.
(setq timer-process nil timer-alist nil))))
(defun cancel-timer (function)
(defun cancel-function-timers (function)
"Cancel all events scheduled by `run-at-time' which would run FUNCTION."
(interactive "aCancel function: ")
(interactive "aCancel timers of function: ")
(let ((alist timer-alist))
(while alist
(if (eq (nth 2 (car alist)) function)