From 13f8accb34ec147f719776e570e7ffb3b1bd2ef4 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 2 Apr 1996 15:14:29 +0000 Subject: [PATCH] (timer-event-handler): Save copies of events too. --- lisp/timer.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/timer.el b/lisp/timer.el index 64f8764a3e4..ebf52a85790 100644 --- a/lisp/timer.el +++ b/lisp/timer.el @@ -219,7 +219,7 @@ fire repeatedly that many seconds apart." (interactive "e") (setq timer-event-last-2 timer-event-last-1) (setq timer-event-last-1 timer-event-last) - (setq timer-event-last event) + (setq timer-event-last (cons event (copy-sequence event))) (let ((inhibit-quit t) (timer (car-safe (cdr-safe event)))) (if (timerp timer) -- 2.39.2