(apropos-print): Make the directions inserted at the

beginning of the *Apropos* buffer more clear.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 11b0dbda38eb8e574ebaf943ea608c377a2c985f..af5fab2cab136a3431de5862ded47375be135bfd 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-28  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * apropos.el (apropos-print): Make the directions inserted at the
+       beginning of the *Apropos* buffer more clear.
+
 2001-09-27  Michael Kifer  <kifer@cs.sunysb.edu>
        
        * ediff-mult.el (ediff-get-meta-info): Installed Gerd's changes.

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 553b54057d879b006f13ef7307116c45362d84ec..d61527591fa485281f616e47293120a86c46faed 100644 (file)
--- 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)