1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/help-macro.el b/lisp/help-macro.el
index 28c040d6b58..ff9c71b3ee0 100644
--- a/lisp/help-macro.el
+++ b/lisp/help-macro.el
@@ -91,7 +91,7 @@ and then returns."
            (let ((line-prompt
                   (substitute-command-keys (, help-line))))
              (if three-step-help
-                 (message line-prompt))
+                 (message "%s" line-prompt))
              (let* ((help-screen (documentation (quote (, fname))))
                     ;; We bind overriding-local-map for very small
                     ;; sections, *excluding* where we switch buffers