allow insertion of non-strings into Org code blocks

* lisp/ob-org.el (org-babel-expand-body:org): Allow insertion of
  non-strings into Org code blocks.
This commit is contained in:
Eric Schulte 2013-05-03 09:53:48 -06:00
parent c42c54f3f7
commit 30c0ceb8ec
1 changed files with 3 additions and 2 deletions

View File

@ -43,8 +43,9 @@
(defun org-babel-expand-body:org (body params)
(dolist (var (mapcar #'cdr (org-babel-get-header params :var)))
(setq body (replace-regexp-in-string
(regexp-quote (format "$%s" (car var))) (cdr var) body
nil 'literal)))
(regexp-quote (format "$%s" (car var)))
(format "%s" (cdr var))
body nil 'literal)))
body)
(defun org-babel-execute:org (body params)