[elpa] externals/drepl 3be39d056f 2/9: Guard against return value t from while-no-input

[ELPA Syncer]

branch: externals/drepl
commit 3be39d056f96be6cbed63f51a4cab2a75b538e82
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    Guard against return value t from while-no-input
---
 drepl.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/drepl.el b/drepl.el
index 3101616bee..334a1454ae 100644
--- a/drepl.el
+++ b/drepl.el
@@ -329,10 +329,11 @@ interactively."
                     (drepl--communicate repl 'sync 'complete
                                         :code code
                                         :offset offset))))
-    (mapcar (lambda (c)
-              (let-alist c
-                (propertize .text 'drepl--annot .annot)))
-            (alist-get 'candidates response))))
+    (when (listp response)
+      (mapcar (lambda (c)
+                (let-alist c
+                  (propertize .text 'drepl--annot .annot)))
+              (alist-get 'candidates response)))))
 
 (defun drepl--complete ()
   "Function intended for use as a member of `completion-at-point-functions'."