diff options
| author | Richard M. Stallman | 2005-12-26 21:22:55 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2005-12-26 21:22:55 +0000 |
| commit | 543e570f73647065278ee79a558748b08c1eb0ef (patch) | |
| tree | 5b2f2499ec838660b4c8dd328a31cd7960e4af00 | |
| parent | 2a4ec7e1ef5cbb34bf65c888ff600787ec4654b2 (diff) | |
| download | emacs-543e570f73647065278ee79a558748b08c1eb0ef.tar.gz emacs-543e570f73647065278ee79a558748b08c1eb0ef.zip | |
(apropos): Doc fix.
| -rw-r--r-- | lisp/apropos.el | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index c4ce2d1fa3c..c8201de492a 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el | |||
| @@ -511,21 +511,22 @@ or a regexp (using some regexp special characters). If it is a word, | |||
| 511 | search for matches for that word as a substring. If it is a list of words, | 511 | search for matches for that word as a substring. If it is a list of words, |
| 512 | search for matches for any two (or more) of those words. | 512 | search for matches for any two (or more) of those words. |
| 513 | 513 | ||
| 514 | With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, also | 514 | With \\[universal-argument] prefix, or if `apropos-do-all' is non-nil, |
| 515 | show unbound symbols and key bindings, which is a little more | 515 | consider all symbols (if they match PATTERN). |
| 516 | time-consuming. Returns list of symbols and documentation found." | 516 | |
| 517 | Returns list of symbols and documentation found." | ||
| 517 | (interactive (list (apropos-read-pattern "symbol") | 518 | (interactive (list (apropos-read-pattern "symbol") |
| 518 | current-prefix-arg)) | 519 | current-prefix-arg)) |
| 519 | (apropos-parse-pattern pattern) | 520 | (apropos-parse-pattern pattern) |
| 520 | (apropos-symbols-internal | 521 | (apropos-symbols-internal |
| 521 | (apropos-internal apropos-regexp | 522 | (apropos-internal apropos-regexp |
| 522 | (and (not do-all) | 523 | (and (not do-all) |
| 523 | (not apropos-do-all) | 524 | (not apropos-do-all) |
| 524 | (lambda (symbol) | 525 | (lambda (symbol) |
| 525 | (or (fboundp symbol) | 526 | (or (fboundp symbol) |
| 526 | (boundp symbol) | 527 | (boundp symbol) |
| 527 | (facep symbol) | 528 | (facep symbol) |
| 528 | (symbol-plist symbol))))) | 529 | (symbol-plist symbol))))) |
| 529 | (or do-all apropos-do-all))) | 530 | (or do-all apropos-do-all))) |
| 530 | 531 | ||
| 531 | (defun apropos-symbols-internal (symbols keys &optional text) | 532 | (defun apropos-symbols-internal (symbols keys &optional text) |