diff options
author | Dan Davison <davison@stats.ox.ac.uk> | 2010-10-21 12:40:39 +0100 |
---|---|---|
committer | Dan Davison <davison@stats.ox.ac.uk> | 2010-10-21 13:06:01 +0100 |
commit | bdbc4961c8658d3059d4c8d8521b10cdc4df1b54 (patch) | |
tree | 5a307eb30656281ec0d728b361e7b6ae046fe6df | |
parent | a6720e38a35f9c8904fc19296c7b1a2fe438e720 (diff) | |
download | org-mode-bdbc4961c8658d3059d4c8d8521b10cdc4df1b54.tar.gz |
babel: scheme: Fix bug in obtaining variable references
* ob-scheme.el (org-babel-expand-body:scheme): Fix bug in
obtaining variable references
-rw-r--r-- | lisp/ob-scheme.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ob-scheme.el b/lisp/ob-scheme.el index 1b9e780..aeb5b95 100644 --- a/lisp/ob-scheme.el +++ b/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 |