mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-06-14 12:31:25 +00:00
lisp/emacs-lisp/debug-early.el (debug-early--handler): Fix bug#80916
This commit is contained in:
parent
4d8fb1623c
commit
fa528b4e5c
1 changed files with 6 additions and 2 deletions
|
|
@ -115,8 +115,12 @@ available before `debug' was usable.)"
|
|||
|
||||
(defalias 'debug-early--handler ;Called from C.
|
||||
#'(lambda (err)
|
||||
(if backtrace-on-error-noninteractive
|
||||
(debug--early err #'debug-early--handler))))
|
||||
;; Do the same `inhibit-debugger' dance as we do in
|
||||
;; `(maybe_)call_debugger' to avoid nested debugging (bug#80916).
|
||||
(if (and backtrace-on-error-noninteractive
|
||||
(not inhibit-debugger))
|
||||
(let ((inhibit-debugger t))
|
||||
(debug--early err #'debug-early--handler)))))
|
||||
|
||||
(defalias 'debug-early--muted ;Called from C.
|
||||
#'(lambda (err)
|
||||
|
|
|
|||
Loading…
Reference in a new issue