summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDan Davison <dandavison7@gmail.com>2010-12-19 14:25:18 +0000
committerDan Davison <dandavison7@gmail.com>2010-12-19 14:25:18 +0000
commitd6fefb406ef08a2c6840372b7197876ee6fddc78 (patch)
treee0d6c590d00f2cb055f7a4eaee2edbee7db12e48
parent2a3663b31437bc7cfb25887bf7d7a762eb6c733d (diff)
downloadorg-mode-d6fefb406ef08a2c6840372b7197876ee6fddc78.tar.gz
babel: Interpret string results as file links with :results file
* lisp/ob.el (org-babel-execute-src-block): With :results file, when :file is not supplied, interpret result as a file link as long as it is a string.
-rw-r--r--lisp/ob.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ob.el b/lisp/ob.el
index c4b43bd..515b579 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -407,7 +407,8 @@ block."
((lambda (result)
(cond
((member "file" result-params)
- (cdr (assoc :file params)))
+ (or (cdr (assoc :file params))
+ (if (stringp result) result)))
((and (eq (cdr (assoc :result-type params)) 'value)
(or (member "vector" result-params)
(member "table" result-params))