diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-08-23 17:01:03 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-08-23 17:01:03 +0000 |
| commit | d24193dcc89b94c5322cdbfea112f13a7afd1ccc (patch) | |
| tree | 7e3044b204165c7ecdeb9567444d6bb05deae71d /lisp/time.el | |
| parent | 722b0f75b176366fa8901c6e67990a8ef9408cf7 (diff) | |
| download | emacs-d24193dcc89b94c5322cdbfea112f13a7afd1ccc.tar.gz | |
(display-time-hook): Minor doc fix.
Diffstat (limited to 'lisp/time.el')
| -rw-r--r-- | lisp/time.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/time.el b/lisp/time.el index 6708ef88243..ad94c2c4fab 100644 --- a/lisp/time.el +++ b/lisp/time.el @@ -64,7 +64,7 @@ Nil means 1 <= hh <= 12, and an AM/PM suffix is used." (defvar display-time-string nil) (defcustom display-time-hook nil - "* List of functions to be called when the time is updated on the mode line." + "*List of functions to be called when the time is updated on the mode line." :type 'hook :group 'display-time) @@ -208,7 +208,7 @@ would give mode line times like `94/12/30 21:07:48 (UTC)'." (if (> (- (nth 1 (current-time)) (nth 1 start-time)) 20) ;; Record that mail file is not accessible. - (setq display-time-server-down-time + (setq display-time-server-down-time (nth 1 (current-time))) ;; Record that mail file is accessible. (setq display-time-server-down-time nil)))))) |