mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
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:
@ -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))))
|
||||||
|
Reference in New Issue
Block a user