summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Schulte <schulte.eric@gmail.com>2011-10-24 20:00:02 -0600
committerEric Schulte <schulte.eric@gmail.com>2011-10-24 20:00:02 -0600
commit2429e834915a11b58c85f18488976e274d6ce387 (patch)
tree047c328d8ed8a0a21bee51e29c3664d1479784b2
parent47e27c28b6dee38ce96829bdab9a1e2ab1960e90 (diff)
downloadorg-mode-2429e834915a11b58c85f18488976e274d6ce387.tar.gz
ob-shen: fix two compilation errors
* lisp/ob-shen.el (org-babel-execute:shen): Fix two compilation errors.
-rw-r--r--lisp/ob-shen.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ob-shen.el b/lisp/ob-shen.el
index 3917deb..ccf3030 100644
--- a/lisp/ob-shen.el
+++ b/lisp/ob-shen.el
@@ -63,13 +63,14 @@
This function is called by `org-babel-execute-src-block'"
(require 'inf-shen)
(let* ((result-type (cdr (assoc :result-type params)))
+ (result-params (cdr (assoc :result-params params)))
(full-body (org-babel-expand-body:shen body params)))
((lambda (results)
(if (or (member 'scalar result-params)
(member 'verbatim result-params))
results
(condition-case nil (org-babel-script-escape results)
- (error result))))
+ (error results))))
(with-temp-buffer
(insert full-body)
(call-interactively #'shen-eval-defun)))))