[nongnu] elpa/inf-clojure b61efe1 008/313: Make the completion command customizable

[ELPA Syncer]

branch: elpa/inf-clojure
commit b61efe1cfaef66e090b90bd05158fda960ffd090
Author: Bozhidar Batsov <bozhidar@tradeo.com>
Commit: Bozhidar Batsov <bozhidar@tradeo.com>

    Make the completion command customizable
---
 inf-clojure.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/inf-clojure.el b/inf-clojure.el
index 0214345..c4648c0 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -359,6 +359,10 @@ Used by these commands to determine defaults."
   "(:arglists (clojure.core/meta #'%s))\n"
   "Command to query inferior Clojure for a function's arglist.")
 
+(defvar clojure-completion-command
+  "(complete.core/completions \"%s\")\n"
+  "Command to query inferior Clojure for completion candidates.")
+
 ;;; Ancillary functions
 ;;; ===================
 
@@ -435,7 +439,7 @@ See variable `clojure-arglist-command'."
     (unwind-protect
         (let ((completion-snippet
                (format
-                "(complete.core/completions \"%s\")\n" 
(substring-no-properties expr))))
+                clojure-completion-command (substring-no-properties expr))))
           (process-send-string proc completion-snippet)
           (while (and (not (string-match inf-clojure-prompt kept))
                       (accept-process-output proc 2)))