From b3c457ddf4f71b2978f00eb352c0db60a1eb373e Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Sat, 16 Nov 2019 22:12:53 -0500 Subject: org-maint.el: Tighten "next rev" regexp --- org-maint.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/org-maint.el b/org-maint.el index db5b16a..5343f22 100644 --- a/org-maint.el +++ b/org-maint.el @@ -34,7 +34,8 @@ If APPLY is non-nil, use 'git apply' instead of 'git am'." (defun org-maint-rev-from-next-item () (save-excursion - (or (and (re-search-forward "- \\[[ X]\\] \\([A-z0-9]\\{40\\}\\)") + (or (and (re-search-forward (rx "- [" (or " " "X") "] " + (group (= 40 hex-digit)))) (match-string-no-properties 1)) (user-error "Next revision item not found")))) -- cgit v1.2.3