[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 85c13c1d9b 2/4: consult--jump-preview: Specify
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 85c13c1d9b 2/4: consult--jump-preview: Specify overlay priorities |
Date: |
Tue, 11 Oct 2022 07:57:33 -0400 (EDT) |
branch: externals/consult
commit 85c13c1d9be473807041a6ede9a78111284c2797
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
consult--jump-preview: Specify overlay priorities
---
consult.el | 9 ++++++---
1 file changed, 6 insertions(+), 3 deletions(-)
diff --git a/consult.el b/consult.el
index 5f7cd8463e..8e6533d695 100644
--- a/consult.el
+++ b/consult.el
@@ -1391,15 +1391,18 @@ The function can be used as the `:state' argument of
`consult--read'."
(end (line-end-position)))
(consult--overlay vbeg (if (= vend end) (1+ end)
vend)
'face 'consult-preview-line
- 'window (selected-window))))
+ 'window (selected-window)
+ 'priority 1)))
(consult--overlay (point) (1+ (point))
'face 'consult-preview-cursor
- 'window (selected-window))))
+ 'window (selected-window)
+ 'priority 3)))
(dolist (match (cdr-safe cand))
(push (consult--overlay (+ (point) (car match))
(+ (point) (cdr match))
'face 'consult-preview-match
- 'window (selected-window))
+ 'window (selected-window)
+ 'priority 2)
overlays))
(run-hooks 'consult-after-jump-hook))))))