浏览代码

DONE Fix nested evaluation

  and commenting out debugging statements
Eric Schulte 16 年之前
父节点
当前提交
34cf22bdaa
共有 2 个文件被更改,包括 5 次插入5 次删除
  1. 3 3
      lisp/org-babel-ref.el
  2. 2 2
      org-babel.org

+ 3 - 3
lisp/org-babel-ref.el

@@ -96,12 +96,12 @@ return nil."
       (when (string-match "^\\(.+?\\)\(\\(.*\\)\)$" ref)
         (setq new-refere (match-string 1 ref))
         (setq new-referent (match-string 2 ref))
-        (message "new-refere=%S, new-referent=%S" new-refere new-referent) ;; debugging
+        ;; (message "new-refere=%S, new-referent=%S" new-refere new-referent) ;; debugging
         (when (> (length new-refere) 0)
           (if (> (length new-referent) 0)
               (setq args (mapcar (lambda (ref) (cons :var ref))
                                  (org-babel-ref-split-args new-referent))))
-          (message "args=%S" args)
+          ;; (message "args=%S" args) ;; debugging
           (setq ref new-refere)))
       (when (string-match "\\(.+\\):\\(.+\\)" ref)
         (find-file (match-string 1 ref))
@@ -134,7 +134,7 @@ return nil."
           (beginning-of-line)
           (if (or (= (point) (point-min)) (= (point) (point-max)))
               (error "reference not found"))))
-      (message "type=%S" type) ;; debugging
+      ;; (message "type=%S" type) ;; debugging
       (case type
         ('results-line (org-babel-ref-read-result))
         ('table (org-babel-ref-read-table))

+ 2 - 2
org-babel.org

@@ -2283,8 +2283,8 @@ plot data using 1:2 with lines
 (see [[* file result types][file result types]])
 
 
-* Bugs [24/36]
-** STARTED Fix nested evaluation
+* Bugs [25/36]
+** DONE Fix nested evaluation
    The current parser / evaluator fails with greater levels of nested
    function block calls (example below).