[nongnu] elpa/inf-clojure 896edd1 131/313: Handle inf-clojure-arglists corner cases

[ELPA Syncer]

branch: elpa/inf-clojure
commit 896edd105e927ef73cb15b1c762f85b226bfd671
Author: Andrea Richiardi <a.richiardi.work@gmail.com>
Commit: Bozhidar Batsov <bozhidar.batsov@gmail.com>

    Handle inf-clojure-arglists corner cases
---
 inf-clojure.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/inf-clojure.el b/inf-clojure.el
index dc45515..f16a92f 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -929,8 +929,12 @@ the results buffer.  It cuts out the output from
 (defun inf-clojure-arglists (fn)
   "Send a query to the inferior Clojure for the arglists for function FN.
 See variable `inf-clojure-arglists-form'."
-  (let ((eldoc-snippet (format (inf-clojure-arglists-form) fn)))
-    (inf-clojure-results-from-process (inf-clojure-proc) eldoc-snippet)))
+  (let* ((arglists-snippet (format (inf-clojure-arglists-form) fn))
+         (arglists-result (inf-clojure-results-from-process (inf-clojure-proc) 
arglists-snippet))
+         (arglists-data (read arglists-result)))
+    (cond
+     ((null arglists-data) nil)
+     ((listp arglists-data) (string-trim (inf-clojure--single-linify 
arglists-result))))))
 
 (defun inf-clojure-show-arglists (prompt-for-symbol)
   "Show the arglists for function FN in the mini-buffer.