diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2025-03-06 15:23:03 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2025-03-06 15:23:03 -0500 |
| commit | fb33e3b4c79f8d922d9fe6e593dcc12c3c4b24eb (patch) | |
| tree | d6e58dde3d4273791bdea01a21c0eb588d4b82a6 /lisp/emacs-lisp/debug.el | |
| parent | 4719df9f42c157e2683ac641883cff5efaa480bc (diff) | |
| download | emacs-fb33e3b4c79f8d922d9fe6e593dcc12c3c4b24eb.tar.gz emacs-fb33e3b4c79f8d922d9fe6e593dcc12c3c4b24eb.tar.bz2 emacs-fb33e3b4c79f8d922d9fe6e593dcc12c3c4b24eb.zip | |
(debug--early): Avoid re-entering the debugger for the same error
Fixes bug#76787.
* lisp/emacs-lisp/debug.el (debugger--last-error): Move ...
* lisp/emacs-lisp/debug-early.el (debugger--last-error): ... here.
(debug--early): Use it.
Diffstat (limited to 'lisp/emacs-lisp/debug.el')
| -rw-r--r-- | lisp/emacs-lisp/debug.el | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index f8af6eafa32..c1aaa1ac623 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -153,8 +153,6 @@ where CAUSE can be: (insert (debugger--buffer-state-content state))) (goto-char (debugger--buffer-state-pos state))) -(defvar debugger--last-error nil) - (defun debugger--duplicate-p (args) (pcase args (`(error ,err . ,_) (and (consp err) (eq err debugger--last-error))))) |