changeset 80240:943eeadd2a75

(startup-echo-area-message): Check for about-emacs.
author Juri Linkov <juri@jurta.org>
date Thu, 28 Feb 2008 22:55:37 +0000
parents 88b9f0aa6ce0
children 158cdf102893
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Thu Feb 28 22:43:30 2008 +0000
+++ b/lisp/startup.el	Thu Feb 28 22:55:37 2008 +0000
@@ -1834,7 +1834,7 @@
   (insert "\tBuying printed manuals from the FSF\n"))
 
 (defun startup-echo-area-message ()
-  (if (eq (key-binding "\C-h\C-p") 'describe-project)
+  (if (eq (key-binding "\C-h\C-a") 'about-emacs)
       "For information about GNU Emacs and the GNU system, type C-h C-a."
     (substitute-command-keys
      "For information about GNU Emacs and the GNU system, type \