From 7ecb4a8b10bcfebc50107df6892faf10987c9478 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Fri, 22 Sep 2023 22:58:05 -0500 Subject: [PATCH] Tidy --- org-ql-completing-read.el | 5 ----- 1 file changed, 5 deletions(-) diff --git a/org-ql-completing-read.el b/org-ql-completing-read.el index d67ca86..23a5aea 100644 --- a/org-ql-completing-read.el +++ b/org-ql-completing-read.el @@ -153,11 +153,6 @@ single predicate)." ;; (f &rest args) (apply #'message (concat "ORG-QL-COMPLETING-READ: " f) args)) (action () (font-lock-ensure (point-at-bol) (point-at-eol)) - ;; FIXME: We want the fontified string, and `org-heading-components' returns it - ;; without properties, so we have to use `org-get-heading', which added additional - ;; optional arguments in a certain Org version, so in those versions, it will - ;; return priority cookies and comment strings. - ;; This function needs to handle multiple candidates per ;; call, so we loop over a list of values by default. (pcase-dolist (`(,string . ,marker) (funcall action-filter (funcall action)))