(menu-bar-help-menu): Change menu-item "Show Emacs Version" to "About

Emacs".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0d70b1d33bcea21c6392a2d1c09d9a8b179dc35c..c05e430aa294f36ad76eddded9e133f947227a5a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,12 @@
+2002-01-29  Pavel Jan\e,Bm\e(Bk  <Pavel@Janik.cz>
+
+       * menu-bar.el (menu-bar-help-menu): Change menu-item "Show Emacs
+       Version" to "About Emacs".
+
+       * startup.el (normal-splash-screen, display-splash-screen):
+       New functions (separated from command-line-1).
+       (command-line-1): Use them.
+
 2002-01-28  Eli Zaretskii  <eliz@is.elta.co.il>
 
        * calendar/calendar.el (generate-calendar-month): Doc fix.

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 6234ca873f4a80d5470a8c44efe7860f7ffc2ff7..95bc9a8f0067dc47d80dece45225c3abe23fcb0b 100644 (file)
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -1040,8 +1040,9 @@ key (or menu-item)"))
                                               data-directory))
                  (goto-address)))
              :help "Where to find some extra packages and possible updates"))
-(define-key menu-bar-help-menu [emacs-version]
-  '(menu-item "Show Emacs Version" emacs-version))
+(define-key menu-bar-help-menu [about]
+  '(menu-item "About Emacs" display-splash-screen
+             :help "Display splash screen, version, and instructions"))
 (define-key menu-bar-help-menu [sep2]
   '("--"))
 (define-key menu-bar-help-menu [finder-by-keyword]