summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2005-03-26 14:46:16 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2005-03-26 14:46:16 +0000
commitbe940bc538e28d6e3a9ba1337f5aafc046a96272 (patch)
tree74d476232752ea069b9cacf23c08a7ec2caad78a /lisp/emacs-lisp
parent44f050e90ace416f754a414f1b14251eb2b05e81 (diff)
downloademacs-be940bc538e28d6e3a9ba1337f5aafc046a96272.tar.gz
emacs-be940bc538e28d6e3a9ba1337f5aafc046a96272.tar.bz2
emacs-be940bc538e28d6e3a9ba1337f5aafc046a96272.zip
(debugger-record-expression): Add a missing format to `message'.
Inspired by Deepak Goel <deego@gnufans.org>.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/debug.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index e97e9012fc1..1e45439658c 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -584,10 +584,9 @@ Applies to the frame whose line point is on in the backtrace."
(terpri))
(with-current-buffer (get-buffer debugger-record-buffer)
- (save-excursion
- (forward-line -1)
- (message
- (buffer-substring (point) (progn (end-of-line) (point)))))))
+ (message "%s"
+ (buffer-substring (line-beginning-position 0)
+ (line-end-position 0)))))
(put 'debugger-mode 'mode-class 'special)