Mercurial > emacs
changeset 42838:913ca287f1d7
Remove trailing whitespaces.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Sat, 19 Jan 2002 14:05:57 +0000 |
parents | 324b7e2693b6 |
children | df6b9860f119 |
files | lisp/time.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/time.el Sat Jan 19 14:04:08 2002 +0000 +++ b/lisp/time.el Sat Jan 19 14:05:57 2002 +0000 @@ -159,7 +159,7 @@ display-time-mail-face :background))) 'help-echo "mouse-2: Read mail" - 'local-map (make-mode-line-mouse-map 'mouse-2 + 'local-map (make-mode-line-mouse-map 'mouse-2 read-mail-command))) "")) "*A list of expressions governing display of the time in the mode line. @@ -232,7 +232,7 @@ (let ((str (format " %03d" (nth display-time-load-average (load-average))))) (propertize (concat (substring str 0 -2) "." (substring str -2)) - 'local-map (make-mode-line-mouse-map 'mouse-2 + 'local-map (make-mode-line-mouse-map 'mouse-2 'display-time-next-load-average) 'help-echo (concat "System load average for past " (if (= 0 display-time-load-average)