From f992349954cbcd20313de55a70a8b170474a039c Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 21 Jun 1997 17:31:29 +0000 Subject: [PATCH] Comment change. --- lisp/wid-edit.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index ec9fdcdc596..898ad25924d 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -2636,10 +2636,11 @@ when he invoked the menu." (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) -- 2.39.5