[elpa] externals/dape 87c91273ec 107/123: Add error message on launch/attach fail

[ELPA Syncer]

branch: externals/dape
commit 87c91273ec48d56b4d9720af09a92adadbed45f3
Author: Daniel Pettersson <dan...@dpettersson.net>
Commit: Daniel Pettersson <dan...@dpettersson.net>

    Add error message on launch/attach fail
---
 dape.el | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/dape.el b/dape.el
index de788ce64b..52667d85a9 100644
--- a/dape.el
+++ b/dape.el
@@ -921,11 +921,15 @@ Uses `dape--config' to derive type and to construct 
request."
                             when (keywordp key)
                             append (list key value))
                    start-debugging)
-                  ;; nil start-debugging only if started as a part of
-                  ;; a start-debugging request
-                  (when start-debugging
-                    (dape--callback
-                     (plist-put dape--config 'start-debugging nil))))))
+                  (dape--callback
+                   ;; nil start-debugging only if started as a part of
+                   ;; a start-debugging request
+                   (when start-debugging
+                     (plist-put dape--config 'start-debugging nil))
+                   (unless success
+                     (dape--repl-insert-text (concat msg "\n")
+                                             'dape-repl-exit-code-fail)
+                     (dape-kill))))))
 
 (defun dape--set-breakpoints (process buffer breakpoints &optional cb)
   "Set BREAKPOINTS in BUFFER by send setBreakpoints request to PROCESS.