Explorar o código

babel: scheme: Fix bug in obtaining variable references

	* ob-scheme.el (org-babel-expand-body:scheme): Fix bug in
	obtaining variable references
Dan Davison %!s(int64=15) %!d(string=hai) anos
pai
achega
bdbc4961c8
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      lisp/ob-scheme.el

+ 1 - 1
lisp/ob-scheme.el

@@ -61,7 +61,7 @@
 
 (defun org-babel-expand-body:scheme (body params)
   "Expand BODY according to PARAMS, return the expanded body."
-  (let ((vars (org-babel-get-header params :var)))
+  (let ((vars (mapcar #'cdr (org-babel-get-header params :var))))
     (if (> (length vars) 0)
         (concat "(let ("
                 (mapconcat