From: Kim F. Storm <storm@cua.dk>
Date: Sun, 16 May 2004 21:43:57 +0000 (+0000)
Subject: (timer-event-handler): Fix last change.
X-Git-Tag: ttn-vms-21-2-B4~6195
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8cb7feb8b17c8f5cda151d9754c392d707c6d70b;p=emacs.git

(timer-event-handler): Fix last change.
---

diff --git a/lisp/emacs-lisp/timer.el b/lisp/emacs-lisp/timer.el
index 395d1e70484..336a1ff82d0 100644
--- a/lisp/emacs-lisp/timer.el
+++ b/lisp/emacs-lisp/timer.el
@@ -296,7 +296,7 @@ This function is called, by name, directly by the C code."
 	      (apply (aref timer 5) (aref timer 6))
 	    (error nil))
 	  (if retrigger
-	      (aset timer 7 nil)))
+	      (aset timer 0 nil)))
       (error "Bogus timer event"))))
 
 ;; This function is incompatible with the one in levents.el.