diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2002-01-19 14:05:57 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2002-01-19 14:05:57 +0000 |
| commit | b03e7e2f06526dbe798903aee44b6465e7a06d26 (patch) | |
| tree | bc3185a21aff4b5583e430578704c9568999ec58 /lisp/time.el | |
| parent | 37082f8d2f55e2d6354a5c93aff8a1b5da1d30c6 (diff) | |
| download | emacs-b03e7e2f06526dbe798903aee44b6465e7a06d26.tar.gz | |
Remove trailing whitespaces.
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 851612da70d..8bf3bcf8f3f 100644 --- a/lisp/time.el +++ b/lisp/time.el @@ -159,7 +159,7 @@ depend on `display-time-day-and-date' and `display-time-24hr-format'." 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 @@ would give mode line times like `94/12/30 21:07:48 (UTC)'." (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) |