Hi Seb,
Thanks for the suggestion, I've just applied a slight alteration of
these improved messages.
#+begin_src diff
diff --git a/lisp/ob.el b/lisp/ob.el
index dd285db..fe392d9 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -1504,9 +1504,9 @@ code ---- the results are extracted in the syntax of
the source
(indent-rigidly beg end indent))))
(if (= (length result) 0)
(if (member "value" result-params)
- (message "No result returned by source block")
- (message "Source block produced no output"))
- (message "finished"))))
+ (message "Code block returned no value.")
+ (message "Code block produced no output."))
+ (message "Code block evaluation complete."))))
(defun org-babel-remove-result (&optional info)
"Remove the result of the current source block."
#+end_src
Best -- Eric
Sébastien Vauban <wxhgmqzgw...@spammotel.com> writes:
> Hi,
>
> Here are a couple of better (IMHO) messages for what occurs during source
> block execution:
>
> diff --git a/lisp/ob.el b/lisp/ob.el
> index dd285db..05bb320 100644
> --- a/lisp/ob.el
> +++ b/lisp/ob.el
> @@ -1504,9 +1504,9 @@ code ---- the results are extracted in the syntax of
> the source
> (indent-rigidly beg end indent))))
> (if (= (length result) 0)
> (if (member "value" result-params)
> - (message "No result returned by source block")
> - (message "Source block produced no output"))
> - (message "finished"))))
> + (message "Source block returned no value.")
> + (message "Source block produced no output."))
> + (message "Inserted results of source block execution."))))
>
> (defun org-babel-remove-result (&optional info)
> "Remove the result of the current source block."
>
> Best regards,
> Seb
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
