1 files changed, 1 insertions, 2 deletions

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index ff65fb56e59..f1287e43e50 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -3485,8 +3485,7 @@ To use this type, you must define :match or :match-alternatives."
          (help-echo (and widget (widget-get widget :help-echo))))
     (if (functionp help-echo)
         (setq help-echo (funcall help-echo widget)))
-    (if (stringp help-echo)
-        (message "%s" help-echo))))
+    (if help-echo (message "%s" (eval help-echo)))))
 
 ;;; The End: