From 046c6887bcacc226d2a9bfb3136e9ab905d9acac Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sat, 29 May 1993 20:43:41 +0000
Subject: [PATCH] (cancel-function-timers): Renamed from spurious duplicate
 definition of cancel-timer.

---
 lisp/timer.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/timer.el b/lisp/timer.el
index e63f77defa0..1bfc5ec323a 100644
--- a/lisp/timer.el
+++ b/lisp/timer.el
@@ -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)