From d48a699b1c1f6e949dc7cd2badbc7d32d10bdd18 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Sat, 16 Nov 2019 21:46:36 -0500
Subject: org-maint.el: Take in next rev helper

---
 org-maint.el          | 6 ++++++
 orgmode-backports.org | 9 ---------
 2 files changed, 6 insertions(+), 9 deletions(-)

diff --git a/org-maint.el b/org-maint.el
index 3e2f782..3e8f8df 100644
--- a/org-maint.el
+++ b/org-maint.el
@@ -31,3 +31,9 @@ If APPLY is non-nil, use 'git apply' instead of 'git am'."
     (call-process "git" nil t nil
                   "show" "-s" "--format=%b%n%s%n%H%n%an%n%cd"
                   commit)))
+
+(defun org-maint-rev-from-next-item ()
+  (save-excursion
+    (or (and (re-search-forward "- \\[[ X]\\] \\([A-z0-9]\\{40\\}\\)")
+             (match-string-no-properties 1))
+        (user-error "Next revision item not found"))))
diff --git a/orgmode-backports.org b/orgmode-backports.org
index 2e5d8dd..84b5fe9 100644
--- a/orgmode-backports.org
+++ b/orgmode-backports.org
@@ -42,15 +42,6 @@ and then after resolving run
 
 * Backport list
 
-#+begin_src elisp :results silent
-  (require 'ob-shell)
-
-  (defun org-maint-rev-from-next-item ()
-    (or (and (re-search-forward "- \\[[ X]\\] \\([A-z0-9]\\{40\\}\\)")
-             (match-string-no-properties 1))
-        (user-error "Next revision item not found")))
-#+end_src
-
 NOTE: Look for "ONSYNC" for changes that should be considered when
 syncing, but that don't seem appropriate for Org backport.
 
-- 
cgit v1.2.3