Commit 91341ed2 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(run-with-timer): Set repetition interval.

parent 7458cc35
......@@ -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)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment