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

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