File tree 1 file changed +10
-10
lines changed
1 file changed +10
-10
lines changed Original file line number Diff line number Diff line change @@ -489,16 +489,16 @@ FILE-NAME is the filename in which the breakpoints have been udpated."
489
489
(let ((set-breakpoints-req (dap--set-breakpoints-request
490
490
file-name
491
491
updated-file-breakpoints)))
492
- (-as- > (dap--get-sessions) $
493
- (-filter ' dap--session-running $)
494
- (--each $
495
- (dap--send-message set-breakpoints-req
496
- (dap-- resp-handler
497
- ( lambda ( resp )
498
- (dap--update-breakpoints it
499
- resp
500
- file-name) ))
501
- it ))))
492
+ (mapc ( lambda ( session )
493
+ ( dap--send-message
494
+ set-breakpoints-req
495
+ (dap--resp-handler
496
+ ( lambda ( resp )
497
+ (dap--update-breakpoints session
498
+ resp
499
+ file-name)))
500
+ session ))
501
+ (-filter # 'dap--session-running (dap--get-sessions ))))
502
502
(dap--persist-breakpoints breakpoints)))
503
503
504
504
(defun dap-breakpoint-toggle ()
You can’t perform that action at this time.
0 commit comments