[PATCH] org.el: fx org-get-priority-function funcall (give arg - headline)

[Anton Latukha <anton@latukha.com>]

[-- Attachment #1: Type: text/html, Size: 2694 bytes --]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-org.el-fx-org-get-priority-function-funcall-give-arg.patch --]
[-- Type: text/x-diff; name="0001-org.el-fx-org-get-priority-function-funcall-give-arg.patch", Size: 1018 bytes --]

From d9b237304b23b8bbb75e9b799bd3698060bc82a9 Mon Sep 17 00:00:00 2001
From: Anton-Latukha <anton.latukha@gmail.com>
Date: Sun, 29 Sep 2019 01:13:41 +0300
Subject: [PATCH] org.el: fx org-get-priority-function funcall (give arg -
 headline)

* org.el (org-get-priority): Fix to allow the use of custom priority
getters.
Provide the headline as argument to the custom priority getter
function.
---
 lisp/org.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 450d16083..71490893d 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -11678,7 +11678,7 @@ and by additional input from the age of a schedules or deadline entry."
   "Find priority cookie and return priority."
   (save-match-data
     (if (functionp org-get-priority-function)
-	(funcall org-get-priority-function)
+	(funcall org-get-priority-function s)
       (if (not (string-match org-priority-regexp s))
 	  (* 1000 (- org-lowest-priority org-default-priority))
 	(* 1000 (- org-lowest-priority
-- 
2.23.0