From: Eli Zaretskii Date: Fri, 28 Sep 2001 06:11:25 +0000 (+0000) Subject: (apropos-print): Make the directions inserted at the X-Git-Tag: emacs-21.1~130 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d94d5b5a4ba8f680b306bc5dcc880232c5b9c293;p=emacs.git (apropos-print): Make the directions inserted at the beginning of the *Apropos* buffer more clear. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 11b0dbda38e..af5fab2cab1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2001-09-28 Eli Zaretskii + + * apropos.el (apropos-print): Make the directions inserted at the + beginning of the *Apropos* buffer more clear. + 2001-09-27 Michael Kifer * ediff-mult.el (ediff-get-meta-info): Installed Gerd's changes. diff --git a/lisp/apropos.el b/lisp/apropos.el index 553b54057d8..d61527591fa 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -517,11 +517,13 @@ alphabetically by symbol name; but this function also sets (set-buffer standard-output) (apropos-mode) (if (display-mouse-p) - (insert "If you move the mouse over text that changes color,\n" + (insert "If moving the mouse over text changes the text's color,\n" (substitute-command-keys - "you can click \\[apropos-mouse-follow] to get more information.\n"))) - (insert (substitute-command-keys - "In this buffer, type \\[apropos-follow] to get full documentation.\n\n")) + "you can click \\[apropos-mouse-follow] on that text to get more information.\n"))) + (insert "In this buffer, go to the name of the command, or function" + " or variable,\n" + (substitute-command-keys + "and type \\[apropos-follow] to get full documentation.\n\n")) (while (consp p) (or (not spacing) (bobp) (terpri)) (setq apropos-item (car p)