[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/dape 29c694f2b1 2/2: Show each breakpoint as verified w
From: |
ELPA Syncer |
Subject: |
[elpa] externals/dape 29c694f2b1 2/2: Show each breakpoint as verified when no connection active |
Date: |
Sat, 11 May 2024 21:57:44 -0400 (EDT) |
branch: externals/dape
commit 29c694f2b103b39eb1538f95e5a3a6ea4b2f58e9
Author: Daniel Pettersson <daniel@dpettersson.net>
Commit: Daniel Pettersson <daniel@dpettersson.net>
Show each breakpoint as verified when no connection active
---
dape.el | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/dape.el b/dape.el
index db0705c221..b6c54a44e2 100644
--- a/dape.el
+++ b/dape.el
@@ -3542,8 +3542,12 @@ displayed."
for breakpoint in (reverse dape--breakpoints)
for buffer = (overlay-buffer breakpoint)
for verified-plist = (overlay-get breakpoint 'dape-verified-plist)
- for verified-p = (cl-find-if (apply-partially 'plist-get verified-plist)
- (dape--live-connections))
+ for verified-p = (or
+ ;; No live connection show every breakpoint
+ ;; as verified
+ (not (dape--live-connection 'last t))
+ (cl-find-if (apply-partially 'plist-get
verified-plist)
+ (dape--live-connections)))
for line = (with-current-buffer buffer
(line-number-at-pos (overlay-start breakpoint)))
do (gdb-table-add-row