diff options
author | Richard M. Stallman <rms@gnu.org> | 1996-04-02 15:14:29 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1996-04-02 15:14:29 +0000 |
commit | 46bec26ad3b30aae804d3b39e864f4c2d91636da (patch) | |
tree | df7d0bbbe526b4b3e1133be5508f9fbc0833df1d /lisp | |
parent | 7b1f93f69661cff9345e6edf3b0df2a2c13fbc30 (diff) | |
download | emacs-46bec26ad3b30aae804d3b39e864f4c2d91636da.tar.gz |
(timer-event-handler): Save copies of events too.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/timer.el | 2 |
1 files changed, 1 insertions, 1 deletions
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) |