From: Juri Linkov Date: Thu, 28 Feb 2008 22:59:12 +0000 (+0000) Subject: (startup-echo-area-message): Check for about-emacs. X-Git-Tag: emacs-pretest-23.0.90~7585 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bd8b0ebb99ea3b594b778d072e38b676cc35a0bf;p=emacs.git (startup-echo-area-message): Check for about-emacs. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d3e3ccc66ae..2a813b43f37 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2008-02-28 Kim F. Storm + + * startup.el (startup-echo-area-message): Check for about-emacs. + 2008-02-28 Juri Linkov * startup.el: Always add initial message to *scratch* buffer if diff --git a/lisp/startup.el b/lisp/startup.el index 5238a1e5936..6d99e27fdef 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -1893,7 +1893,7 @@ Type \\[describe-distribution] for information on ")) (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 \