diff --git a/cider-client.el b/cider-client.el index 3853a5b03..8a1555680 100644 --- a/cider-client.el +++ b/cider-client.el @@ -458,7 +458,8 @@ CONTEXT represents a completion context for compliment." "ns" ,(cider-current-ns) "symbol" ,str "context" ,context) - (cider-nrepl-send-sync-request nil 'abort-on-input)))) + (cider-nrepl-send-sync-request (cider-current-repl) + 'abort-on-input)))) (nrepl-dict-get dict "completions"))) (defun cider-sync-request:complete-flush-caches () @@ -474,7 +475,7 @@ CONTEXT represents a completion context for compliment." ,@(when symbol `("symbol" ,symbol)) ,@(when class `("class" ,class)) ,@(when member `("member" ,member))) - (cider-nrepl-send-sync-request)))) + (cider-nrepl-send-sync-request (cider-current-repl))))) (if (member "no-info" (nrepl-dict-get var-info "status")) nil var-info))) @@ -486,7 +487,8 @@ CONTEXT represents a completion context for compliment." ,@(when symbol `("symbol" ,symbol)) ,@(when class `("class" ,class)) ,@(when member `("member" ,member))) - (cider-nrepl-send-sync-request nil 'abort-on-input)))) + (cider-nrepl-send-sync-request (cider-current-repl) + 'abort-on-input)))) (if (member "no-eldoc" (nrepl-dict-get eldoc "status")) nil eldoc)))