diff options
Diffstat (limited to 'lisp/ob-shen.el')
| -rw-r--r-- | lisp/ob-shen.el | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/ob-shen.el b/lisp/ob-shen.el index dc6313d..68169da 100644 --- a/lisp/ob-shen.el +++ b/lisp/ob-shen.el @@ -66,14 +66,14 @@ This function is called by `org-babel-execute-src-block'" (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) - (org-babel-result-cond result-params - results - (condition-case nil (org-babel-script-escape results) - (error results)))) - (with-temp-buffer - (insert full-body) - (call-interactively #'shen-eval-defun))))) + (let ((results + (with-temp-buffer + (insert full-body) + (call-interactively #'shen-eval-defun)))) + (org-babel-result-cond result-params + results + (condition-case nil (org-babel-script-escape results) + (error results)))))) (provide 'ob-shen) ;;; ob-shen.el ends here |