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

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/vertico-posframe d88cd6b 1/7: Simply vertico-posframe-c


From: ELPA Syncer
Subject: [elpa] externals/vertico-posframe d88cd6b 1/7: Simply vertico-posframe-cursor face handle
Date: Fri, 29 Oct 2021 19:57:30 -0400 (EDT)

branch: externals/vertico-posframe
commit d88cd6ba7771ef341eab32dbdbf4d8149ed5a97d
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    Simply vertico-posframe-cursor face handle
    
        * vertico-posframe.el (vertico-posframe-cursor): auto test light/dark 
seem unstable, do not use.
        (vertico-posframe-post-command-function): set cursor char's foreground.
---
 vertico-posframe.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/vertico-posframe.el b/vertico-posframe.el
index 04761e0..ac0d5fc 100644
--- a/vertico-posframe.el
+++ b/vertico-posframe.el
@@ -118,10 +118,7 @@ When 0, no border is showed."
   :group 'vertico-posframe)
 
 (defface vertico-posframe-cursor
-  '((((class color) (background light))
-     :foreground "white" :background "black" :inherit cursor)
-    (((class color) (background dark))
-     :foreground "black" :background "white" :inherit cursor))
+  '((t (:inherit cursor)))
   "Face used by the vertico-posframe's fake cursor."
   :group 'vertico-posframe)
 
@@ -267,7 +264,11 @@ Show STRING when it is a string."
             (insert count prompt "  \n")
             (add-text-properties
              (+ point count-length) (+ point count-length 1)
-             '(face vertico-posframe-cursor))))))))
+             `(face (;; FIXME: make sure background and foreground do
+                     ;; not have similar color. ivy-posframe have not
+                     ;; this problem, I can not find the reason.
+                     :foreground ,(face-attribute 'default :background)
+                     :inherit vertico-posframe-cursor)))))))))
 
 (defun vertico-posframe--setup ()
   "Setup minibuffer overlay, which pushes the minibuffer content down."



reply via email to

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