Commit 543e570f authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(apropos): Doc fix.

parent 2a4ec7e1
...@@ -511,21 +511,22 @@ or a regexp (using some regexp special characters). If it is a word, ...@@ -511,21 +511,22 @@ or a regexp (using some regexp special characters). If it is a word,
search for matches for that word as a substring. If it is a list of words, search for matches for that word as a substring. If it is a list of words,
search for matches for any two (or more) of those words. search for matches for any two (or more) of those words.
With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, also With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil,
show unbound symbols and key bindings, which is a little more consider all symbols (if they match PATTERN).
time-consuming. Returns list of symbols and documentation found."
Returns list of symbols and documentation found."
(interactive (list (apropos-read-pattern "symbol") (interactive (list (apropos-read-pattern "symbol")
current-prefix-arg)) current-prefix-arg))
(apropos-parse-pattern pattern) (apropos-parse-pattern pattern)
(apropos-symbols-internal (apropos-symbols-internal
(apropos-internal apropos-regexp (apropos-internal apropos-regexp
(and (not do-all) (and (not do-all)
(not apropos-do-all) (not apropos-do-all)
(lambda (symbol) (lambda (symbol)
(or (fboundp symbol) (or (fboundp symbol)
(boundp symbol) (boundp symbol)
(facep symbol) (facep symbol)
(symbol-plist symbol))))) (symbol-plist symbol)))))
(or do-all apropos-do-all))) (or do-all apropos-do-all)))
(defun apropos-symbols-internal (symbols keys &optional text) (defun apropos-symbols-internal (symbols keys &optional text)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment