From 6a0c650dd2c2ba9f922663750e066fb47e2b2111 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 4 Jan 2013 18:15:51 +0100 Subject: [PATCH] org.el (org-get-priority): Save match data even when using `org-get-priority-function' * org.el (org-get-priority): Save match data even when using `org-get-priority-function'. --- lisp/org.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 7522a0ae3..c52f9a59c 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -13011,9 +13011,9 @@ and by additional input from the age of a schedules or deadline entry." (defun org-get-priority (s) "Find priority cookie and return priority." - (if (functionp org-get-priority-function) - (funcall org-get-priority-function) - (save-match-data + (save-match-data + (if (functionp org-get-priority-function) + (funcall org-get-priority-function) (if (not (string-match org-priority-regexp s)) (* 1000 (- org-lowest-priority org-default-priority)) (* 1000 (- org-lowest-priority