branch: externals/dape
commit 3a31e537827e5ceaf06606b03cfac17cca3c78d1
Author: Daniel Pettersson <[email protected]>
Commit: Daniel Pettersson <[email protected]>
Fix sticky breakpoint issue
Unable to remove breakpoint if it was the last breakpoint in the
buffer.
---
dape.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/dape.el b/dape.el
index 9710bcca99..235e265462 100644
--- a/dape.el
+++ b/dape.el
@@ -1510,11 +1510,12 @@ If SKIP-TYPES overlays with properties in SKIP-TYPES
are filtered."
(defun dape--update-breakpoints-in-buffer (buffer)
"Update all breakpoints in BUFFER."
(when (buffer-live-p buffer)
- (when-let ((process (dape--live-process t))
- (breakpoints (thread-last dape--breakpoints
- (seq-group-by 'overlay-buffer)
- (alist-get buffer))))
- (dape--set-breakpoints process buffer breakpoints))))
+ (when-let ((process (dape--live-process t)))
+ (dape--set-breakpoints process
+ buffer
+ (thread-last dape--breakpoints
+ (seq-group-by 'overlay-buffer)
+ (alist-get buffer))))))
(defun dape--place-breakpoint (&optional log-message expression)
"Place breakpoint at current line.
