ソースを参照

Noweb style references are now expanded with loading a code block in a session.

* lisp/ob.el (org-babel-load-in-session): expanding noweb references
  when appropriate
Aditya Siram 14 年 前
コミット
58f0a4ed41
1 ファイル変更5 行追加1 行削除
  1. 5 1
      lisp/ob.el

+ 5 - 1
lisp/ob.el

@@ -421,8 +421,12 @@ session."
   (interactive)
   (let* ((info (or info (org-babel-get-src-block-info)))
          (lang (nth 0 info))
-         (body (nth 1 info))
          (params (nth 2 info))
+         (body (setf (nth 1 info)
+		     (if (and (cdr (assoc :noweb params))
+                              (string= "yes" (cdr (assoc :noweb params))))
+                         (org-babel-expand-noweb-references info)
+		       (nth 1 info))))
          (session (cdr (assoc :session params)))
 	 (dir (cdr (assoc :dir params)))
 	 (default-directory