[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/corfu 15b0eee 05/29: Improve face definitions
From: |
Stefan Monnier |
Subject: |
[elpa] externals/corfu 15b0eee 05/29: Improve face definitions |
Date: |
Fri, 16 Apr 2021 18:44:13 -0400 (EDT) |
branch: externals/corfu
commit 15b0eee457ddecd54c802a348e1b4df11095d609
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Improve face definitions
---
corfu.el | 28 ++++++++++++++++++++++++----
1 file changed, 24 insertions(+), 4 deletions(-)
diff --git a/corfu.el b/corfu.el
index f38d35d..f6c51d5 100644
--- a/corfu.el
+++ b/corfu.el
@@ -56,16 +56,36 @@
:group 'corfu
:group 'faces)
-(defface corfu-background '((t :background "#FFE" :inherit default))
+(defface corfu-background
+ '((((class color) (min-colors 88) (background dark))
+ :background "#222" :inherit default)
+ (((class color) (min-colors 88) (background light))
+ :background "#ffe" :inherit default)
+ (t :background "gray" :foreground "black" :inherit default))
"Face used to for the overlay background.")
-(defface corfu-current '((t :background "#CEF" :inherit default))
+(defface corfu-current
+ '((((class color) (min-colors 88) (background dark))
+ :background "#137" :inherit default)
+ (((class color) (min-colors 88) (background light))
+ :background "#cef" :inherit default)
+ (t :background "blue" :foreground "white" :inherit default))
"Face used to highlight the currently selected candidate.")
-(defface corfu-bar '((t :foreground "#666"))
+(defface corfu-bar
+ '((((class color) (min-colors 88) (background dark))
+ :foreground "#888")
+ (((class color) (min-colors 88) (background light))
+ :foreground "#666")
+ (t :background "black"))
"Face used for the scrollbar.")
-(defface corfu-border '((t :foreground "#BBB"))
+(defface corfu-border
+ '((((class color) (min-colors 88) (background dark))
+ :foreground "#444")
+ (((class color) (min-colors 88) (background light))
+ :foreground "#bbb")
+ (t :background "gray"))
"Face used for the background of the scrollbar.")
(defvar corfu-map
- [elpa] branch externals/corfu created (now a61992d), Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 55d651e 03/29: Improve keybindings for active Corfu popup, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu bff11ca 04/29: Improve readme, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 15b0eee 05/29: Improve face definitions,
Stefan Monnier <=
- [elpa] externals/corfu 3f930bc 06/29: Popup improvements/truncation, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu bb55c62 01/29: initial commit, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 7d3c6c4 07/29: README: Update features section, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu a2de3f2 11/29: Adjust faces, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 5571d2b 13/29: Revert "Go back to e0198b4335add183e0673c2b224e3d6c3ac09cab for now", Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 4b32521 12/29: Go back to e0198b4335add183e0673c2b224e3d6c3ac09cab for now, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu f721f1b 14/29: Properly compute character size, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 247c79b 16/29: update screenshot, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu 428ef03 08/29: post-command-hook: Make the check more strict, Stefan Monnier, 2021/04/16
- [elpa] externals/corfu e0198b4 09/29: Simplify post-command behavior, Stefan Monnier, 2021/04/16