summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTim Cross <theophilusx@gmail.com>2017-03-07 09:00:27 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2017-03-07 09:09:28 +0100
commit7ed93eba5a279cb4317c1aac6392ba27e43709f0 (patch)
treee83715394940c5438600f32c9394e3ed70936901
parentd73942cf99c8bf610e56b777615f2c5e09cb0b0b (diff)
downloadorg-mode-7ed93eba5a279cb4317c1aac6392ba27e43709f0.tar.gz
Fix incorrect argument call in ob-clojure.el
* lisp/ob-clojure.el (org-babel-execute:clojure): Use `cider-current-ns' instead of `cider-current-session'. org-babel-execute-clojure was calling nrepl-sync-request:eval and nrepl-request:eval with the session ID as the 3rd argument when the functions expected a clojure namespace. TINYCHANGE
-rw-r--r--lisp/ob-clojure.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ob-clojure.el b/lisp/ob-clojure.el
index d407105..ada35a4 100644
--- a/lisp/ob-clojure.el
+++ b/lisp/ob-clojure.el
@@ -43,7 +43,7 @@
(require 'ob)
(declare-function cider-current-connection "ext:cider-client" (&optional type))
-(declare-function cider-current-session "ext:cider-client" ())
+(declare-function cider-current-ns "ext:cider-client" ())
(declare-function nrepl--merge "ext:nrepl-client" (dict1 dict2))
(declare-function nrepl-dict-get "ext:nrepl-client" (dict key))
(declare-function nrepl-dict-put "ext:nrepl-client" (dict key value))
@@ -118,7 +118,7 @@ using the :show-process parameter."
org-babel-clojure-sync-nrepl-timeout))
(nrepl-sync-request:eval expanded
(cider-current-connection)
- (cider-current-session))))
+ (cider-current-ns))))
(setq result
(concat
(nrepl-dict-get response
@@ -153,7 +153,7 @@ using the :show-process parameter."
;; Update the status of the nREPL output session.
(setq status (nrepl-dict-get response "status")))
(cider-current-connection)
- (cider-current-session))
+ (cider-current-ns))
;; Wait until the nREPL code finished to be processed.
(while (not (member "done" status))