Explorar el Código

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 hace 12 años
padre
commit
30c0ceb8ec
Se han modificado 1 ficheros con 3 adiciones y 2 borrados
  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)