(report-calc-bug): Use reporter.el.

[gnu-emacs] / lisp / time.el

diff --git a/lisp/time.el b/lisp/time.el
index 1a5cb04986b6cfd9e49f27339a4bf91495ace9e0..ac7fb2246a702994d26b45477f277b9ce95506dc 100644 (file)
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -1,6 +1,7 @@
-;;; time.el --- display time, load and mail indicator in mode line of Emacs.\r
+;;; time.el --- display time, load and mail indicator in mode line of Emacs
 
-;; Copyright (C) 1985, 86, 87, 93, 94, 96, 2000 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 86, 87, 93, 94, 96, 2000, 2001
+;;   Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 
@@ -142,7 +143,8 @@ 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-mouse2-map read-mail-command)))
+                '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.
 For most purposes, you can control the time format using `display-time-format'
@@ -267,7 +269,7 @@ When this display is enabled, it updates automatically every minute.
 If `display-time-day-and-date' is non-nil, the current day and date
 are displayed as well.
 This runs the normal hook `display-time-hook' after each update."
-  nil nil nil :global t :group 'display-time
+  :global t :group 'display-time
     (and display-time-timer (cancel-timer display-time-timer))
     (setq display-time-timer nil)
     (setq display-time-string "")