emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/dape 181f11bb71 1/2: Fix REPL completion when no adapte


From: ELPA Syncer
Subject: [elpa] externals/dape 181f11bb71 1/2: Fix REPL completion when no adapter connection
Date: Mon, 22 Apr 2024 12:57:42 -0400 (EDT)

branch: externals/dape
commit 181f11bb718f9b8ecb0f6c0873908869d3395da2
Author: Daniel Pettersson <daniel@dpettersson.net>
Commit: Daniel Pettersson <daniel@dpettersson.net>

    Fix REPL completion when no adapter connection
---
 dape.el | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

diff --git a/dape.el b/dape.el
index 6e6bfd8dd6..b1786fd99d 100644
--- a/dape.el
+++ b/dape.el
@@ -4278,14 +4278,16 @@ Send INPUT to DUMMY-PROCESS."
   (let* ((bounds (or (bounds-of-thing-at-point 'word)
                      (cons (point) (point))))
          (trigger-chars
-          (or (thread-first (dape--live-connection 'last t)
-                            (dape--capabilities)
-                            ;; completionTriggerCharacters is an
-                            ;; unofficial array of string to trigger
-                            ;; completion on.
-                            (plist-get :completionTriggerCharacters)
-                            (append nil))
-              '(".")))
+          (when-let ((conn (or (dape--live-connection 'stopped t)
+                               (dape--live-connection 'last t))))
+            (or (thread-first conn
+                              (dape--capabilities)
+                              ;; completionTriggerCharacters is an
+                              ;; unofficial array of string to trigger
+                              ;; completion on.
+                              (plist-get :completionTriggerCharacters)
+                              (append nil))
+                '("."))))
          (collection
           ;; Add `dape-repl-commands' only if completion starts at
           ;; beginning of prompt line.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]