emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] [PATCH 3/4] ob-clojure.el: Use :ns flag in org-src-edit


From: roberthambrock
Subject: [O] [PATCH 3/4] ob-clojure.el: Use :ns flag in org-src-edit
Date: Sun, 22 Apr 2018 22:50:02 +0200

From: Robert Hambrock <address@hidden>

* lisp/ob-clojure.el (org-babel-edit-prep:clojure): New function that
sets the buffer's namespace to the value of :ns, if provided.
(org-babel-edit-prep:clojurescript): Alias for
org-babel-edit-prep:clojure.
---
 lisp/ob-clojure.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/lisp/ob-clojure.el b/lisp/ob-clojure.el
index 7f7c24ff1..c59ac96ab 100644
--- a/lisp/ob-clojure.el
+++ b/lisp/ob-clojure.el
@@ -215,6 +215,12 @@ using the :show-process parameter."
 (defun org-babel-execute:clojurescript (body params)
   (org-babel-execute:clojure body (cons '(:target . "cljs") params)))
 
+(defun org-babel-edit-prep:clojure (babel-info)
+  (if-let* ((namespace (cdr (assq :ns (nth 2 babel-info)))))
+      (setq-local cider-buffer-ns namespace)))
+
+(defalias 'org-babel-edit-prep:clojurescript 'org-babel-edit-prep:clojure)
+
 (provide 'ob-clojure)
 
 ;;; ob-clojure.el ends here
-- 
2.16.3




reply via email to

[Prev in Thread] Current Thread [Next in Thread]