# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 738708221 0
# Node ID ac18ead9965d8e12b8e51168d24e9cecf7fa609e
# Parent  1173bc4814dae0f6d851ce479c82215caa3d406e
(cancel-function-timers): Renamed from spurious duplicate
definition of cancel-timer.

diff -r 1173bc4814da -r ac18ead9965d lisp/=timer.el
--- a/lisp/=timer.el	Sat May 29 20:41:31 1993 +0000
+++ b/lisp/=timer.el	Sat May 29 20:43:41 1993 +0000
@@ -128,9 +128,9 @@
       ;; 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)