[elpa] externals/org 601ce688d5: lisp/ob-clojure.el: Fix :backend override not work with `org-babel-clojure-backend'

[ELPA Syncer]

branch: externals/org
commit 601ce688d5a51db7f1a5262063512f13b581bdc4
Author: stardiviner <numbchild@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>

    lisp/ob-clojure.el: Fix :backend override not work with 
`org-babel-clojure-backend'
    
    * lisp/ob-clojure.el (org-babel-expand-body:clojure): When The source
    block specified header argument :backend, the global option
    `org-babel-clojure-backend' value is default 'cider, the
    `cider-buffer-ns` is not void error.
---
 lisp/ob-clojure.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lisp/ob-clojure.el b/lisp/ob-clojure.el
index d6f860e987..0649469b39 100644
--- a/lisp/ob-clojure.el
+++ b/lisp/ob-clojure.el
@@ -104,6 +104,13 @@
 (defun org-babel-expand-body:clojure (body params)
   "Expand BODY according to PARAMS, return the expanded body."
   (let* ((vars (org-babel--get-vars params))
+         (backend-override (cdr (assq :backend params)))
+         (org-babel-clojure-backend
+          (cond
+           (backend-override (intern backend-override))
+           (org-babel-clojure-backend org-babel-clojure-backend)
+           (t (user-error "You need to customize `org-babel-clojure-backend'
+or set the `:backend' header argument"))))
         (ns (or (cdr (assq :ns params))
                 (if (eq org-babel-clojure-backend 'cider)
                     (or cider-buffer-ns