summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/debug.el
diff options
context:
space:
mode:
authorKaroly Lorentey <lorentey@elte.hu>2005-03-27 17:29:43 +0000
committerKaroly Lorentey <lorentey@elte.hu>2005-03-27 17:29:43 +0000
commita0a7e8c6de361d15703e78a1e934d0347475dcb8 (patch)
treebea99880ecb2d7b242c5fdddb69583b3d686e22b /lisp/emacs-lisp/debug.el
parentcd5caccf0c791bcaa19190f5d62ace1ebe9987c8 (diff)
parent99a5658144bce7733e48d9c1877b2795afc1aa9d (diff)
downloademacs-a0a7e8c6de361d15703e78a1e934d0347475dcb8.tar.gz
emacs-a0a7e8c6de361d15703e78a1e934d0347475dcb8.tar.bz2
emacs-a0a7e8c6de361d15703e78a1e934d0347475dcb8.zip
Merged from miles@gnu.org--gnu-2005 (patch 204-213)
Patches applied: * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-204 Clean up gdb-ui breakpoint faces * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-205 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-206 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-207 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-208 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-209 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-210 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-211 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-212 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-213 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-319
Diffstat (limited to 'lisp/emacs-lisp/debug.el')
-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)