diff options
| author | Juri Linkov | 2019-10-14 23:07:23 +0300 |
|---|---|---|
| committer | Juri Linkov | 2019-10-14 23:07:23 +0300 |
| commit | 674515dd75aea441bc8847a73da18ddd303668e1 (patch) | |
| tree | 2580ca4fd9241e61480ccf261e34e87dbbaa67cb | |
| parent | 6aa0e0c754553e4beb7b4f2774bf7f0e29cb346b (diff) | |
| download | emacs-674515dd75aea441bc8847a73da18ddd303668e1.tar.gz emacs-674515dd75aea441bc8847a73da18ddd303668e1.zip | |
Use variable-pitch fonts in tab-bar and tab-line faces
* lisp/tab-bar.el (tab-bar):
* lisp/tab-line.el (tab-line):
Inherit face from variable-pitch.
| -rw-r--r-- | lisp/tab-bar.el | 5 | ||||
| -rw-r--r-- | lisp/tab-line.el | 8 |
2 files changed, 9 insertions, 4 deletions
diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index b7de64d4ae9..e96d5d15b2b 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el | |||
| @@ -51,6 +51,7 @@ | |||
| 51 | (defface tab-bar | 51 | (defface tab-bar |
| 52 | '((((type x w32 ns) (class color)) | 52 | '((((type x w32 ns) (class color)) |
| 53 | :height 1.1 | 53 | :height 1.1 |
| 54 | :inherit variable-pitch | ||
| 54 | :background "grey85" | 55 | :background "grey85" |
| 55 | :foreground "black") | 56 | :foreground "black") |
| 56 | (((type x) (class mono)) | 57 | (((type x) (class mono)) |
| @@ -62,7 +63,9 @@ | |||
| 62 | :group 'tab-bar-faces) | 63 | :group 'tab-bar-faces) |
| 63 | 64 | ||
| 64 | (defface tab-bar-tab | 65 | (defface tab-bar-tab |
| 65 | '((((class color) (min-colors 88)) | 66 | '((default |
| 67 | :inherit tab-bar) | ||
| 68 | (((class color) (min-colors 88)) | ||
| 66 | :box (:line-width 1 :style released-button)) | 69 | :box (:line-width 1 :style released-button)) |
| 67 | (t | 70 | (t |
| 68 | :inverse-video nil)) | 71 | :inverse-video nil)) |
diff --git a/lisp/tab-line.el b/lisp/tab-line.el index b552df9ba58..69b510b64c0 100644 --- a/lisp/tab-line.el +++ b/lisp/tab-line.el | |||
| @@ -43,6 +43,7 @@ | |||
| 43 | 43 | ||
| 44 | (defface tab-line | 44 | (defface tab-line |
| 45 | '((((type x w32 ns) (class color)) | 45 | '((((type x w32 ns) (class color)) |
| 46 | :inherit variable-pitch | ||
| 46 | :background "grey85" | 47 | :background "grey85" |
| 47 | :foreground "black") | 48 | :foreground "black") |
| 48 | (((type x) (class mono)) | 49 | (((type x) (class mono)) |
| @@ -54,9 +55,10 @@ | |||
| 54 | :group 'tab-line-faces) | 55 | :group 'tab-line-faces) |
| 55 | 56 | ||
| 56 | (defface tab-line-tab | 57 | (defface tab-line-tab |
| 57 | '((((class color) (min-colors 88)) | 58 | '((default |
| 58 | :box (:line-width 1 :style released-button) | 59 | :inherit tab-line) |
| 59 | :background "grey85") | 60 | (((class color) (min-colors 88)) |
| 61 | :box (:line-width 1 :style released-button)) | ||
| 60 | (t | 62 | (t |
| 61 | :inverse-video nil)) | 63 | :inverse-video nil)) |
| 62 | "Tab line face for selected tab." | 64 | "Tab line face for selected tab." |