Commit cef7e1da authored by Richard M. Stallman's avatar Richard M. Stallman

(midnight-delay-set): Use run-hooks directly.

(midnight-timer-function): Function deleted.
parent 08e77a49
......@@ -215,11 +215,7 @@ to its second argument."
(when (timerp midnight-timer) (cancel-timer midnight-timer))
(setq midnight-timer
(run-at-time (if (numberp tm) (+ (midnight-next) tm) tm)
midnight-period 'midnight-timer-function)))
(defun midnight-timer-function ()
"This is the function run by the `midnight-mode' timer once each day."
(run-hooks 'midnight-hook))
midnight-period 'run-hooks 'midnight-hook)))
(defcustom midnight-delay 3600
"*The number of seconds after the midnight when the `midnight-timer' is run.
......
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