emacs-elpa-diffs
[Top][All Lists]
Advanced

[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)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]