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

[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))))



reply via email to

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