[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 6292cfdcbc 2/3: consult-org-heading: Minor opti
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 6292cfdcbc 2/3: consult-org-heading: Minor optimization |
Date: |
Thu, 26 Jan 2023 11:57:25 -0500 (EST) |
branch: externals/consult
commit 6292cfdcbcf278418920100587e509209680af9d
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
consult-org-heading: Minor optimization
---
consult-org.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/consult-org.el b/consult-org.el
index f22fb3414e..8ba0d54e24 100644
--- a/consult-org.el
+++ b/consult-org.el
@@ -72,7 +72,8 @@ MATCH, SCOPE and SKIP are as in `org-map-entries'."
(org-get-outline-path 'with-self 'use-cache)
most-positive-fixnum)))
(when tags
- (setq tags (concat " " (propertize tags 'face 'org-tag))))
+ (setq tags (concat " " tags))
+ (put-text-property 1 (length tags) 'face 'org-tag tags))
(setq cand (if prefix
(concat buffer " " cand tags (consult--tofu-encode
(point)))
(concat cand tags (consult--tofu-encode (point)))))