Fix +debugger/start not working (#4782)

* Fix `+debugger/start` not working

* Correct indentation

Co-authored-by: Henrik Lissner <accounts@v0.io>
This commit is contained in:
Nathan Tran 2021-03-12 02:24:44 +11:00 committed by GitHub
parent 9f08db8e33
commit cdcdde3354
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -48,10 +48,10 @@ the debugging configuration of the current buffer."
Presents both dap and realgud configurations, and returns a list of the form
\('dap ...) or ('realgud ...) containing the corresponding debug configuration
infromation."
(let ((result (mapcar (lambda (c) (cons (cadr c) c))
(append (+debugger--list-for-dap)
(+debugger--list-for-realgud))))
(completion (completing-read "Start debugger: " (mapcar #'car result) nil t)))
(let* ((result (mapcar (lambda (c) (cons (cadr c) c))
(append (+debugger--list-for-dap)
(+debugger--list-for-realgud))))
(completion (completing-read "Start debugger: " (mapcar #'car result) nil t)))
(if (or (null completion) (string-empty-p completion))
(user-error "No debugging configuration specified.")
(let ((configuration (cdr (assoc completion result))))