# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1084743837 0
# Node ID d1f4ffb8ca419c7ae5603be34927d75e152f7d51
# Parent  a3d732209a1e3e226fe1bb7d25360371f191ccfc
(timer-event-handler): Fix last change.

diff -r a3d732209a1e -r d1f4ffb8ca41 lisp/emacs-lisp/timer.el
--- a/lisp/emacs-lisp/timer.el	Sun May 16 21:43:16 2004 +0000
+++ b/lisp/emacs-lisp/timer.el	Sun May 16 21:43:57 2004 +0000
@@ -296,7 +296,7 @@
 	      (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.