[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/zenburn-theme 5347faf6aa 1/4: Add support for ansi-color f
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/zenburn-theme 5347faf6aa 1/4: Add support for ansi-color faces |
Date: |
Sun, 10 Jul 2022 02:59:19 -0400 (EDT) |
branch: elpa/zenburn-theme
commit 5347faf6aa8bfe4869620e58180d29b2633f64f3
Author: montag451 <montag451@laposte.net>
Commit: Bozhidar Batsov <bozhidar@batsov.dev>
Add support for ansi-color faces
---
CHANGELOG.md | 1 +
zenburn-theme.el | 17 +++++++++++++++++
2 files changed, 18 insertions(+)
diff --git a/CHANGELOG.md b/CHANGELOG.md
index 7917fdb303..75b2b00a20 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -8,6 +8,7 @@
* Add `rmail` support
* Add `tab-bar-mode` support
* [#367](https://github.com/bbatsov/zenburn-emacs/pull/367): Brighten org
headline levels 7 and 8 to improve contrast and possibly help those with color
blindness.
+* Add support for `ansi-color` faces
## 2.7 (2020-11-21)
diff --git a/zenburn-theme.el b/zenburn-theme.el
index 24cd416ab5..23621cef96 100644
--- a/zenburn-theme.el
+++ b/zenburn-theme.el
@@ -165,6 +165,23 @@ Also bind `class' to ((class color) (min-colors 89))."
(custom-theme-set-faces
'zenburn
;;;; Built-in
+;;;;; ansi-colors
+ `(ansi-color-black ((t (:foreground ,zenburn-bg
+ :background ,zenburn-bg-1))))
+ `(ansi-color-red ((t (:foreground ,zenburn-red-2
+ :background ,zenburn-red-4))))
+ `(ansi-color-green ((t (:foreground ,zenburn-green
+ :background ,zenburn-green+2))))
+ `(ansi-color-yellow ((t (:foreground ,zenburn-orange
+ :background ,zenburn-yellow))))
+ `(ansi-color-blue ((t (:foreground ,zenburn-blue-1
+ :background ,zenburn-blue-4))))
+ `(ansi-color-magenta ((t (:foreground ,zenburn-magenta
+ :background ,zenburn-red))))
+ `(ansi-color-cyan ((t (:foreground ,zenburn-cyan
+ :background ,zenburn-blue))))
+ `(ansi-color-white ((t (:foreground ,zenburn-fg
+ :background ,zenburn-fg-1))))
;;;;; basic coloring
'(button ((t (:underline t))))
`(link ((t (:foreground ,zenburn-yellow :underline t :weight bold))))