diff options
| -rw-r--r-- | lisp/apropos.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index aadf72d910a..6729e4a4c6a 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el | |||
| @@ -215,6 +215,12 @@ Returns list of symbols and documentation found." | |||
| 215 | symbol 'face-documentation t)) | 215 | symbol 'face-documentation t)) |
| 216 | (substring doc 0 | 216 | (substring doc 0 |
| 217 | (string-match "\n" doc)) | 217 | (string-match "\n" doc)) |
| 218 | "(not documented)")) | ||
| 219 | (when (get symbol 'custom-group) | ||
| 220 | (if (setq doc (documentation-property | ||
| 221 | symbol 'group-documentation t)) | ||
| 222 | (substring doc 0 | ||
| 223 | (string-match "\n" doc)) | ||
| 218 | "(not documented)")))) | 224 | "(not documented)")))) |
| 219 | (setq p (cdr p))))) | 225 | (setq p (cdr p))))) |
| 220 | nil)) | 226 | nil)) |
| @@ -535,6 +541,7 @@ found." | |||
| 535 | "User Option" do-keys) | 541 | "User Option" do-keys) |
| 536 | (apropos-print-doc 'describe-variable 2 | 542 | (apropos-print-doc 'describe-variable 2 |
| 537 | "Variable" do-keys)) | 543 | "Variable" do-keys)) |
| 544 | (apropos-print-doc 'customize-other-window 6 "Group" do-keys) | ||
| 538 | (apropos-print-doc 'customize-face-other-window 5 "Face" do-keys) | 545 | (apropos-print-doc 'customize-face-other-window 5 "Face" do-keys) |
| 539 | (apropos-print-doc 'widget-browse-other-window 4 "Widget" do-keys) | 546 | (apropos-print-doc 'widget-browse-other-window 4 "Widget" do-keys) |
| 540 | (apropos-print-doc 'apropos-describe-plist 3 | 547 | (apropos-print-doc 'apropos-describe-plist 3 |