We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c95537c commit ed360fdCopy full SHA for ed360fd
dap-mode.el
@@ -861,8 +861,10 @@ will be reversed."
861
862
(defun dap--buffers-w-breakpoints ()
863
"Get only the buffers featuring at least one breakpoint"
864
- ;; get the list from the keys of the breakpoint hash-table
865
- (ht-keys (dap--get-breakpoints)))
+ ;; extract the list of buffers featuring a breakpoint from their first breakpoint marker
+ ;; (as stored in the LSP metadata)
866
+ (--map (marker-buffer (plist-get (car it) :marker))
867
+ (ht-values (dap--get-breakpoints))))
868
869
(defun dap--refresh-breakpoints ()
870
"Refresh breakpoints for DEBUG-SESSION."
0 commit comments