# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 822531364 0
# Node ID d093f6556363f6384bf5bf82f39f11dcdf7250ce
# Parent  24189cc6717675d3d038b845ec036c2c6e601feb
(medit-save-define): Pass proper format string to message.

diff -r 24189cc67176 -r d093f6556363 lisp/=medit.el
--- a/lisp/=medit.el	Thu Jan 25 00:55:56 1996 +0000
+++ b/lisp/=medit.el	Thu Jan 25 00:56:04 1996 +0000
@@ -47,7 +47,7 @@
 	(forward-mim-object 1)
 	(append-to-buffer medit-buffer start (point))
 	(goto-char start)
-	(message (buffer-substring start (progn (end-of-line) (point)))))))
+	(message "%s" (buffer-substring start (progn (end-of-line) (point)))))))
 
 (defun medit-save-region (start end)
   "Mark the current region to be sent to back to MDL."