Re: Prepare release 8.2.6

["R. Michael Weylandt" <michael.weylandt@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 312 bytes --]

On Thu, Apr 10, 2014 at 10:43 PM, Eric Schulte <schulte.eric@gmail.com> wrote:
>
> I just tried to apply the second patch, but it no longer applies (with
> "git am") to the Org-mode repo.  Would you mind sending along an updated
> version?
>

Hi Eric,

The attached should apply cleanly against master.

Michael

[-- Attachment #2: 0001-Keybinding-to-remove-result-blocks.patch --]
[-- Type: application/octet-stream, Size: 1789 bytes --]

From d7d3428d5d3ff50b8abab7ad32643fd21b693889 Mon Sep 17 00:00:00 2001
From: Michael Weylandt <michael.weylandt@gmail.com>
Date: Sun, 13 Apr 2014 12:58:31 -0400
Subject: [PATCH] Keybinding to remove result blocks

* ob-core.el (org-babel-remove-result-one-or-many): New function.
* ob-keys.el: Keybinding for new function org-babel-remove-result-one-or-many

TINYCHANGE
---
 lisp/ob-core.el | 9 +++++++++
 lisp/ob-keys.el | 1 +
 2 files changed, 10 insertions(+)

diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index 0adfc33..0e8c57f 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -2252,6 +2252,15 @@ code ---- the results are extracted in the syntax of the source
 	   (if keep-keyword (1+ (match-end 0)) (1- (match-beginning 0)))
 	   (progn (forward-line 1) (org-babel-result-end))))))))
 
+(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."
+  (interactive "P")
+  (if x
+      (org-babel-map-src-blocks nil (org-babel-remove-result))
+    (org-babel-remove-result)))
+
 (defun org-babel-result-end ()
   "Return the point at the end of the current set of results."
   (save-excursion
diff --git a/lisp/ob-keys.el b/lisp/ob-keys.el
index 90b5196..dc1f437 100644
--- a/lisp/ob-keys.el
+++ b/lisp/ob-keys.el
@@ -89,6 +89,7 @@ functions which are assigned key bindings, and see
     ("h" . org-babel-describe-bindings)
     ("\C-x" . org-babel-do-key-sequence-in-edit-buffer)
     ("x" . org-babel-do-key-sequence-in-edit-buffer)
+    ("k" . org-babel-remove-result-one-or-many)
     ("\C-\M-h" . org-babel-mark-block))
   "Alist of key bindings and interactive Babel functions.
 This list associates interactive Babel functions
-- 
1.8.3.4 (Apple Git-47)