Add a couple cells to lisp-prettify-symbols-alist

[gnu-emacs] / lisp / apropos.el

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 6009f30f7a8bc25979f19b2620dcc47a77891ad6..7c9ec12c2e0bb7601a8f9f5bd9ebaa074f8e118b 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -871,7 +871,7 @@ Returns list of symbols and documentation found."
    ((consp doc)
     (apropos-documentation-check-elc-file (car doc)))
    ((and doc
-         ;; Sanity check in case bad data has snuck into the
+         ;; Sanity check in case bad data sneaked into the
          ;; documentation slot.
          (stringp doc)
          (string-match apropos-all-words-regexp doc)
@@ -1044,9 +1044,12 @@ Each element should have the format
 The return value is the list that was in `apropos-accumulator', sorted
 alphabetically by symbol name; but this function also sets
 `apropos-accumulator' to nil before returning.
-
-If SPACING is non-nil, it should be a string; separate items with that string.
-If non-nil, TEXT is a string that will be printed as a heading."
+If DO-KEYS is non-nil, output the key bindings.  If NOSUBST is
+nil, substitute \"ASCII quotes\" (i.e., grace accent and
+apostrophe) with curly quotes), and if non-nil, leave them alone.
+If SPACING is non-nil, it should be a string; separate items with
+that string.  If non-nil, TEXT is a string that will be printed
+as a heading."
   (if (null apropos-accumulator)
       (message "No apropos matches for `%s'" apropos-pattern)
     (setq apropos-accumulator