branch: externals/dape
commit 22dcbbaa1e64d7e549bb1e7dcddc6472140af881
Author: Daniel Pettersson <dan...@dpettersson.net>
Commit: Daniel Pettersson <dan...@dpettersson.net>
Fix formatting
---
dape.el | 18 ++++++++----------
1 file changed, 8 insertions(+), 10 deletions(-)
diff --git a/dape.el b/dape.el
index 07bb96c008..192da3422e 100644
--- a/dape.el
+++ b/dape.el
@@ -3898,8 +3898,7 @@ See `dape-request' for expected CB signature."
Create table from CURRENT-STACK-FRAME and STACK-FRAMES and insert into
current buffer with CONN config."
(cl-loop with table = (make-gdb-table)
- for frame in stack-frames
- do
+ for frame in stack-frames do
(gdb-table-add-row
table
(list
@@ -4049,14 +4048,13 @@ current buffer with CONN config."
dape--connection)))
(cl-loop with sources = (dape--sources conn)
with table = (make-gdb-table)
- for source in (reverse sources)
- do (gdb-table-add-row table
- (list (concat (plist-get source :name) "
"))
- (list
- 'dape--info-source source
- 'mouse-face 'highlight
- 'keymap dape-info-sources-line-map
- 'help-echo "mouse-2, RET: goto source"))
+ for source in (reverse sources) do
+ (gdb-table-add-row
+ table (list (concat (plist-get source :name) " "))
+ (list 'dape--info-source source
+ 'mouse-face 'highlight
+ 'keymap dape-info-sources-line-map
+ 'help-echo "mouse-2, RET: goto source"))
finally (insert (gdb-table-string table " "))))))
