summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/debug.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2003-06-16 18:54:23 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2003-06-16 18:54:23 +0000
commit2f74c84b7de292c8aea0f7c7ebe2c8043ee7f2ae (patch)
tree0f0c65a353df767c25de7cc7510ca4fcbd64cb72 /lisp/emacs-lisp/debug.el
parentd7672cf846e1129f85545f63a515a83e56f02b7d (diff)
downloademacs-2f74c84b7de292c8aea0f7c7ebe2c8043ee7f2ae.tar.gz
(debug): Fix call to message.
Diffstat (limited to 'lisp/emacs-lisp/debug.el')
-rw-r--r--lisp/emacs-lisp/debug.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 43e4d781a77..f62b0c4836e 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -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 @@ first will be printed into the backtrace buffer."
(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.