From afb204303a388f2644a535dccef6f603d3519ead Mon Sep 17 00:00:00 2001 From: Anton-Latukha Date: Sun, 29 Sep 2019 03:08:24 +0300 Subject: [PATCH 1/2] org: org-get-priority: rm: reduce negation operation * org (org-get-priority): reducing bool negation operation by switching if cases --- lisp/org.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 450d16083..72408f49f 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -11679,10 +11679,10 @@ and by additional input from the age of a schedules or deadline entry." (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)) + (if (string-match org-priority-regexp s) (* 1000 (- org-lowest-priority - (string-to-char (match-string 2 s)))))))) + (string-to-char (match-string 2 s)))) + (* 1000 (- org-lowest-priority org-default-priority)))))) ;;;; Tags -- 2.23.0