summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/debug.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el
index 6be30fc9164..579b223fcac 100644
--- a/lisp/emacs-lisp/debug.el
+++ b/lisp/emacs-lisp/debug.el
@@ -220,10 +220,10 @@ first will be printed into the backtrace buffer."
(when (eq (car debugger-args) 'debug)
;; Skip the frames for backtrace-debug, byte-code,
;; and implement-debug-on-entry.
- (backtrace-debug 4 t)
+ (backtrace-debug 3 t)
;; Place an extra debug-on-exit for macro's.
- (when (eq 'lambda (car-safe (cadr (backtrace-frame 4))))
- (backtrace-debug 5 t)))
+ (when (eq 'lambda (car-safe (cadr (backtrace-frame 3))))
+ (backtrace-debug 4 t)))
(pop-to-buffer
debugger-buffer
`((display-buffer-reuse-window