branch: elpa/helm
commit 563cb9b83eddb2efd0a5458593a789bb86b1ed56
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Add visible colors in ttys
---
 helm-core.el | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

diff --git a/helm-core.el b/helm-core.el
index a964447222..9eef9914c8 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -1146,7 +1146,11 @@ then doesn't use `while-no-input', because 
`while-no-input' throws on
   :group 'helm)
 
 (defface helm-source-header
-  `((((background dark))
+  `((((type tty pc))
+     ,@(and (>= emacs-major-version 27) '(:extend t))
+     :background "blue"
+     :foreground "white")
+    (((background dark))
      ,@(and (>= emacs-major-version 27) '(:extend t))
      :background "#22083397778B"
      :foreground "white"
@@ -1202,7 +1206,11 @@ then doesn't use `while-no-input', because 
`while-no-input' throws on
   :group 'helm-faces)
 
 (defface helm-selection
-  `((((background dark))
+  `((((type tty pc))
+     ,@(and (>= emacs-major-version 27) '(:extend t))
+     :background "Brightred"
+     :distant-foreground "black")
+    (((background dark))
      ,@(and (>= emacs-major-version 27) '(:extend t))
      :background "ForestGreen"
      :distant-foreground "black")

Reply via email to