File tree Expand file tree Collapse file tree 1 file changed +10
-10
lines changed Expand file tree Collapse file tree 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."
489489 (let ((set-breakpoints-req (dap--set-breakpoints-request
490490 file-name
491491 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 ))))
502502 (dap--persist-breakpoints breakpoints)))
503503
504504(defun dap-breakpoint-toggle ()
You can’t perform that action at this time.
0 commit comments