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)