瀏覽代碼

ob-clojure: Drop recently added if-let* for compatibility

* lisp/ob-clojure.el (org-babel-edit-prep:clojure): Rewrite without
if-let*, which isn't available until Emacs 26.
Kyle Meyer 5 年之前
父節點
當前提交
e361c64043
共有 1 個文件被更改,包括 3 次插入2 次删除
  1. 3 2
      lisp/ob-clojure.el

+ 3 - 2
lisp/ob-clojure.el

@@ -230,8 +230,9 @@ using the :show-process parameter."
 
 (defun org-babel-edit-prep:clojure (babel-info)
   "Set org-edit-special src block by injecting `cider-buffer-ns' as namespace."
-  (if-let* ((namespace (cdr (assq :ns (nth 2 babel-info)))))
-      (setq-local cider-buffer-ns namespace)))
+  (let ((namespace (cdr (assq :ns (nth 2 babel-info)))))
+    (when namespace
+      (setq-local cider-buffer-ns namespace))))
 
 (defun org-babel-clojure-initiate-session (&optional session _params)
   "Initiate a session named SESSION according to PARAMS."