From 91341ed256e300051342c2ef9d560db1d06f0bc8 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 2 Feb 1996 19:45:55 +0000 Subject: [PATCH] (run-with-timer): Set repetition interval. --- lisp/timer.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/timer.el b/lisp/timer.el index e29ee58a211..94b681abdf0 100644 --- a/lisp/timer.el +++ b/lisp/timer.el @@ -236,7 +236,7 @@ This function returns a timer object which you can use in `cancel-timer'." (error "Invalid repetition interval")) (let ((timer (timer-create))) - (timer-set-time timer (current-time)) + (timer-set-time timer (current-time) repeat) (timer-inc-time timer secs) (timer-set-function timer function args) (timer-activate timer) -- 2.39.2