ob-exp: ensure params are properly processed on export

* lisp/ob-exp.el (org-babel-exp-results): Ensure that processed params
  are send to org-babel-execute-src-block.
This commit is contained in:
Eric Schulte 2011-03-02 07:32:02 -07:00
parent 03a6844054
commit 3755c79485
1 changed files with 5 additions and 5 deletions

View File

@ -252,16 +252,16 @@ inhibit insertion of results into the buffer."
(org-babel-result-hash)))))
(let ((lang (nth 0 info))
(body (nth 1 info)))
(setf (nth 2 info) (org-babel-exp-in-export-file lang
(org-babel-process-params (nth 2 info))))
;; skip code blocks which we can't evaluate
(when (fboundp (intern (concat "org-babel-execute:" lang)))
(org-babel-eval-wipe-error-buffer)
(prog1 nil
(setf (nth 2 info)
(org-babel-merge-params
(nth 2 info)
`((:results . ,(if silent "silent" "replace")))))
(org-babel-exp-in-export-file lang
(org-babel-process-params
(org-babel-merge-params
(nth 2 info)
`((:results . ,(if silent "silent" "replace")))))))
(cond
((or (equal type 'block) (equal type 'inline))
(org-babel-execute-src-block nil info))