Browse Source

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.
Eric Schulte 12 years ago
parent
commit
30c0ceb8ec
1 changed files with 3 additions and 2 deletions
  1. 3 2
      lisp/ob-org.el

+ 3 - 2
lisp/ob-org.el

@@ -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)