# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1055789663 0
# Node ID fc00b549e161aa3fed1ff06036d0779e925b3798
# Parent  d7e174e9d6ebd4f453180f524d5a7398a1f2e7ef
(debug): Fix call to message.

diff -r d7e174e9d6eb -r fc00b549e161 lisp/emacs-lisp/debug.el
--- a/lisp/emacs-lisp/debug.el	Mon Jun 16 17:24:45 2003 +0000
+++ b/lisp/emacs-lisp/debug.el	Mon Jun 16 18:54:23 2003 +0000
@@ -1,6 +1,6 @@
 ;;; debug.el --- debuggers and related commands for Emacs
 
-;; Copyright (C) 1985, 1986, 1994, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1986, 1994, 2001, 2003  Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: lisp, tools, maint
@@ -178,7 +178,7 @@
 		      (delete-region middlestart (point)))
 		    (insert "...\n"))
 		  (goto-char (point-min))
-		  (message (buffer-string))
+		  (message "%s" (buffer-string))
 		  (kill-emacs))
 		(if (eq (car debugger-args) 'debug)
 		    ;; Skip the frames for backtrace-debug, byte-code, and debug.