# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 822531274 0
# Node ID d3b19c9e0bac1d1bf64779bdf136db5b8d47abbd
# Parent  ab041898078d0ae8eb91e870790755302461b497
(make-help-screen): Pass proper format string to message.

diff -r ab041898078d -r d3b19c9e0bac lisp/help-macro.el
--- a/lisp/help-macro.el	Thu Jan 25 00:54:17 1996 +0000
+++ b/lisp/help-macro.el	Thu Jan 25 00:54:34 1996 +0000
@@ -91,7 +91,7 @@
 	   (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