[Emacs-diffs] Changes to emacs/lisp/midnight.el

[Richard M . Stallman]

Index: emacs/lisp/midnight.el
diff -c emacs/lisp/midnight.el:1.23 emacs/lisp/midnight.el:1.24
*** emacs/lisp/midnight.el:1.23 Fri Mar 25 08:23:21 2005
--- emacs/lisp/midnight.el      Sat Apr 23 16:41:33 2005
***************
*** 48,53 ****
--- 48,58 ----
    :group 'calendar
    :version "20.3")
  
+ (defvar midnight-timer nil
+   "Timer running the `midnight-hook' `midnight-delay' seconds after midnight.
+ Use `cancel-timer' to stop it and `midnight-delay-set' to change
+ the time when it is run.")
+ 
  (defcustom midnight-mode nil
    "*Non-nil means run `midnight-hook' at midnight.
  Setting this variable outside customize has no effect;
***************
*** 204,214 ****
    (multiple-value-bind (sec min hrs) (decode-time)
      (- (* 24 60 60) (* 60 60 hrs) (* 60 min) sec)))
  
- (defvar midnight-timer nil
-   "Timer running the `midnight-hook' `midnight-delay' seconds after midnight.
- Use `cancel-timer' to stop it and `midnight-delay-set' to change
- the time when it is run.")
- 
  ;;;###autoload
  (defun midnight-delay-set (symb tm)
    "Modify `midnight-timer' according to `midnight-delay'.
--- 209,214 ----