(f90-mode): Remove startup message.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 73b80a55e2efd75fd4ce78583d73d925276a54fd..66d1d7133ba446626aaf4906b79c5394eb844805 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2001-02-01  Dave Love  <fx@gnu.org>
+
+       * progmodes/f90.el (f90-mode): Remove startup message.
+
 2001-02-01  Gerd Moellmann  <gerd@gnu.org>
 
        * startup.el (command-line): Fix code determining whether or not

diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 914f5e67305ac476be246a666d76d0e9a33bb1a6..6dbd0d2c334eb0d83159ae0896d742ca9b0cae89 100644 (file)
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -889,8 +889,8 @@ with no args, if that value is non-nil."
   (set (make-local-variable 'add-log-current-defun-function)
        #'f90-current-defun)
   (run-hooks 'f90-mode-hook)
-  (if f90-startup-message
-      (message "Emacs F90 mode; please report bugs to %s" bug-f90-mode))
+;;   (if f90-startup-message
+;;       (message "Emacs F90 mode; please report bugs to %s" bug-f90-mode))
   (setq f90-startup-message nil))
 \f
 ;; inline-functions