From d722e4db7295547147e587e9ab6deaa25426f5c8 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Wed, 23 May 2018 07:26:03 -0500 Subject: [PATCH] Fix: (--add-priority-face) match-string Oops... --- org-agenda-ng.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/org-agenda-ng.el b/org-agenda-ng.el index e8c640c..1f862c3 100644 --- a/org-agenda-ng.el +++ b/org-agenda-ng.el @@ -163,7 +163,7 @@ Its property list should be the second item in the list, as returned by `org-ele (defun org-agenda-ng--add-priority-face (string) "Return STRING with priority face added." (when (string-match "\\(\\[#\\(.\\)\\]\\)" string) - (let ((face (org-get-priority-face (string-to-char (match-string 2))))) + (let ((face (org-get-priority-face (string-to-char (match-string 2 string))))) (org-add-props string nil 'face face 'font-lock-fontified t)))) (defun org-agenda-ng--add-scheduled-face (element)