aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--org-maint.el6
-rw-r--r--orgmode-backports.org9
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.