diff options
| author | Glenn Morris | 2008-08-30 03:25:50 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-08-30 03:25:50 +0000 |
| commit | 7cb78ecd636d513a4ef95b677034512caf6424d3 (patch) | |
| tree | c19e5cbf30603fd88fc1dab3a42bea1aab26be99 /lisp | |
| parent | e77e9cf40975a5943b3c2bfdab6eca1c44eaa32f (diff) | |
| download | emacs-7cb78ecd636d513a4ef95b677034512caf6424d3.tar.gz emacs-7cb78ecd636d513a4ef95b677034512caf6424d3.zip | |
(apropos-command): Ignore documentation errors. (Bug#825)
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/apropos.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index 0f00d2d3617..a0ac773cd23 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el | |||
| @@ -489,7 +489,7 @@ while a list of strings is used as a word list." | |||
| 489 | (setq score (apropos-score-symbol symbol)) | 489 | (setq score (apropos-score-symbol symbol)) |
| 490 | (unless var-predicate | 490 | (unless var-predicate |
| 491 | (if (fboundp symbol) | 491 | (if (fboundp symbol) |
| 492 | (if (setq doc (documentation symbol t)) | 492 | (if (setq doc (ignore-errors (documentation symbol t))) |
| 493 | (progn | 493 | (progn |
| 494 | (setq score (+ score (apropos-score-doc doc))) | 494 | (setq score (+ score (apropos-score-doc doc))) |
| 495 | (substring doc 0 (string-match "\n" doc))) | 495 | (substring doc 0 (string-match "\n" doc))) |