# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1204239337 0
# Node ID 943eeadd2a758b4cd4900ca2a0abc80e7262f3ca
# Parent  88b9f0aa6ce0ac319440c99934499ac3816b1c56
(startup-echo-area-message): Check for about-emacs.

diff -r 88b9f0aa6ce0 -r 943eeadd2a75 lisp/startup.el
--- 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 \