yogsototh/org-mode
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Different messages for :results output and value modes.

Browse source
This commit is contained in:
Dan Davison 2009-07-16 01:16:49 -04:00
parent 213b045359
commit 2b273bce7d
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/org-babel.el
View file

@ -426,7 +426,9 @@ silent -- no results are inserted"
(unless (listp result) (setq result (format "%S" result))))
(if (and insert (member "replace" insert)) (org-babel-remove-result))
(if (= (length result) 0)
(message "no result returned by source block")
(if (member "value" result-params)
(message "No result returned by source block")
(message "Source block produced no output"))
(if (and insert (member "silent" insert))
(progn (message (replace-regexp-in-string "%" "%%" (format "%S" result))) result)
(when (and (stringp result) ;; ensure results end in a newline