Mercurial > emacs
changeset 18366:2aaa07c43738
Comment change.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 21 Jun 1997 17:31:29 +0000 |
parents | ceb9388fe67f |
children | f4682a047be1 |
files | lisp/wid-edit.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/wid-edit.el Sat Jun 21 17:30:26 1997 +0000 +++ b/lisp/wid-edit.el Sat Jun 21 17:31:29 1997 +0000 @@ -2636,10 +2636,11 @@ (concat "Describe the `" (widget-get widget :value) "' symbol.")) (defun widget-documentation-link-action (widget &optional event) - "Run apropos on WIDGET's value. Ignore optional argument EVENT." + "Display documentation for WIDGET's value. Ignore optional argument EVENT." (let* ((string (widget-get widget :value)) (symbol (intern string))) (if (and (fboundp symbol) (boundp symbol)) + ;; If there are two doc strings, give the user a way to pick one. (apropos (concat "\\`" (regexp-quote string) "\\'")) (if (fboundp symbol) (describe-function symbol)