diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-21 22:22:06 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-10-21 22:22:16 +0200 |
| commit | 7e5f3a809109fc9643739bea2113563805618df2 (patch) | |
| tree | d647b6f862b3bc1311a2e1d2864960483cec5b7a /lisp/emacs-lisp/edebug.el | |
| parent | 73cea54064828197f9db256fb4b925ef6be85861 (diff) | |
| download | emacs-7e5f3a809109fc9643739bea2113563805618df2.tar.gz emacs-7e5f3a809109fc9643739bea2113563805618df2.tar.bz2 emacs-7e5f3a809109fc9643739bea2113563805618df2.zip | |
Ensure we always remove the breakpoint overlays
* lisp/emacs-lisp/edebug.el (edebug--display-1): Remove the
overlays here -- this cleans up after exiting no matter how we
exited.
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 0c3164b5cb8..9c85ae3dd3d 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -2845,6 +2845,7 @@ See `edebug-behavior-alist' for implementations.") (goto-char edebug-buffer-outside-point)) ;; ... nothing more. ) + (edebug--overlay-breakpoints-remove (point-min) (point-max)) ;; Could be an option to keep eval display up. (if edebug-eval-buffer (kill-buffer edebug-eval-buffer)) (with-timeout-unsuspend edebug-with-timeout-suspend) @@ -2944,7 +2945,6 @@ See `edebug-behavior-alist' for implementations.") (setq signal-hook-function #'edebug-signal) (if edebug-backtrace-buffer (kill-buffer edebug-backtrace-buffer)) - (edebug--overlay-breakpoints-remove (point-min) (point-max)) ;; Remember selected-window after recursive-edit. ;; (setq edebug-inside-window (selected-window)) |