branch: elpa/inf-clojure
commit b61efe1cfaef66e090b90bd05158fda960ffd090
Author: Bozhidar Batsov <bozhi...@tradeo.com>
Commit: Bozhidar Batsov <bozhi...@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)))
