mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-30 05:43:27 +00:00
Code Releases Activity

Don't attempt to remove result when :results silent.

Browse source
This commit is contained in:
Dan Davison 2009-07-17 13:58:04 -04:00
parent 9ebb554527
commit 8c9d8b6c28
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/org-babel.el
View file

@ -448,7 +448,8 @@ silent -- no results are inserted"
(setq result (org-babel-clean-text-properties result))
(if (member "file" insert) (setq result (org-babel-result-to-file result))))
(unless (listp result) (setq result (format "%S" result))))
(if (and insert (member "replace" insert)) (org-babel-remove-result))
(if (and insert (member "replace" insert) (not (member "silent" insert)))
(org-babel-remove-result))
(if (= (length result) 0)
(if (member "value" result-params)
(message "No result returned by source block")