[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 0804d27a8c: consult--remove-text-properties: Ad
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 0804d27a8c: consult--remove-text-properties: Add comment why we don't use yank-excluded-properties |
Date: |
Wed, 26 Jan 2022 16:57:23 -0500 (EST) |
branch: externals/consult
commit 0804d27a8c5c4ebbf157356f255d022bb84336cc
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
consult--remove-text-properties: Add comment why we don't use
yank-excluded-properties
---
consult.el | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/consult.el b/consult.el
index 6c10d92d1f..03813a79d9 100644
--- a/consult.el
+++ b/consult.el
@@ -998,10 +998,13 @@ tofu-encoded MARKER suffix for disambiguation."
(add-text-properties 0 1 `(consult-location (,marker . ,line) ,@props) cand)
cand)
+;; There is a similar variable `yank-excluded-properties'. Unfortunately
+;; we cannot use it here since it excludes too much (e.g., invisible)
+;; and at the same time not enough (e.g., cursor-sensor-functions).
(defconst consult--remove-text-properties
- '(mouse-face help-echo keymap local-map read-only cursor-intangible field
cursor pointer
- modification-hooks insert-in-front-hooks insert-behind-hooks
cursor-sensor-functions
- front-sticky rear-nonsticky follow-link)
+ '(category cursor cursor-intangible cursor-sensor-functions field
follow-link font-lock-face
+ fontified front-sticky help-echo insert-behind-hooks insert-in-front-hooks
intangible keymap
+ local-map modification-hooks mouse-face pointer read-only rear-nonsticky
yank-handler)
"List of text properties to remove from buffer strings.")
(defsubst consult--buffer-substring (beg end &optional fontify)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/consult 0804d27a8c: consult--remove-text-properties: Add comment why we don't use yank-excluded-properties,
ELPA Syncer <=