From af94ed1c07a914ba686076c83a08f80c3b21c32b Mon Sep 17 00:00:00 2001 From: Charles Berry Date: Fri, 30 Jan 2015 19:14:51 -0800 Subject: [PATCH 2/2] ob-core.el: `org-babel-remove-result-one-or-many' removes inline results * ob-core.el (org-babel-remove-result-one-or-many): Remove all results of babel executables, including inline results. --- lisp/ob-core.el | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) diff --git a/lisp/ob-core.el b/lisp/ob-core.el index ceda1aa..6c8a587 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2339,13 +2339,16 @@ Leading whitespace is trimmed." (org-element-property :post-blank el))))))))) (defun org-babel-remove-result-one-or-many (x) - "Remove the result of the current source block. -If called with a prefix argument, remove all result blocks -in the buffer." + "Remove the result of the current (inline) source block. +If called with a prefix argument, remove all result blocks and +macros in the buffer." (interactive "P") (if x - (org-babel-map-src-blocks nil (org-babel-remove-result)) - (org-babel-remove-result))) + (org-babel-map-executables nil + (org-babel-remove-result) + (org-babel-remove-inline-result)) + (org-babel-remove-result) + (org-babel-remove-inline-result))) (defun org-babel-result-end () "Return the point at the end of the current set of results." -- 1.9.3 (Apple Git-50)