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 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))))