diff options
| author | Sébastien Delafond <sdelafond@gmail.com> | 2014-07-13 13:35:27 +0200 |
|---|---|---|
| committer | Sébastien Delafond <sdelafond@gmail.com> | 2014-07-13 13:35:27 +0200 |
| commit | e32a45ed36d6000db4b39171149072d11b77af72 (patch) | |
| tree | b5f4a7d43022c08c3298e82b3e9fc50f68be660f /lisp/ob-shen.el | |
| parent | 7697fa4daf3ec84f85711a84035d8f0224afd4e3 (diff) | |
Imported Upstream version 8.0.7
Diffstat (limited to 'lisp/ob-shen.el')
| -rw-r--r-- | lisp/ob-shen.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/ob-shen.el b/lisp/ob-shen.el index 8f4b132..a41580f 100644 --- a/lisp/ob-shen.el +++ b/lisp/ob-shen.el @@ -1,6 +1,6 @@ ;;; ob-shen.el --- org-babel functions for Shen -;; Copyright (C) 2010-2012 Free Software Foundation, Inc. +;; Copyright (C) 2010-2013 Free Software Foundation, Inc. ;; Author: Eric Schulte ;; Keywords: literate programming, reproducible research, shen @@ -66,9 +66,8 @@ This function is called by `org-babel-execute-src-block'" (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 + (org-babel-result-cond result-params + results (condition-case nil (org-babel-script-escape results) (error results)))) (with-temp-buffer |