branch: elpa/apropospriate-theme
commit 02a252c06dfa15542a281d200e174c2a0f2cdf9c
Author: justin talbott <[email protected]>
Commit: justin talbott <[email protected]>
allow apropospriate-mode-line-height as nil to work the same as 1.0
---
apropospriate.el | 16 +++++++++-------
1 file changed, 9 insertions(+), 7 deletions(-)
diff --git a/apropospriate.el b/apropospriate.el
index 7f076e1..4024098 100644
--- a/apropospriate.el
+++ b/apropospriate.el
@@ -33,7 +33,7 @@
(defcustom apropospriate-mode-line-height 0.95
"The proportional font size of the mode-line in the apropospriate theme.
-Set to `1.0' to prevent font size manipulation."
+Set to `1.0' or nil to prevent font size manipulation."
:type 'number
:group 'solarized)
@@ -148,16 +148,18 @@ Set to `1.0' to prevent font size manipulation."
`(font-lock-variable-name-face ((,class (:foreground ,teal))))
`(font-lock-warning-face ((,class (:foreground ,red))))
`(mode-line ((,class (:box (:line-width 4 :color ,light-emphasis :style
nil)
- :background ,base00-2 :foreground ,base03
:height ,apropospriate-mode-line-height))))
+ :background ,base00-2 :foreground ,base03
+ :height ,(or apropospriate-mode-line-height
1.0)))))
`(mode-line-inactive ((,class (:box (:line-width 4 :color ,base00+1
:style nil)
- :background ,base00+1 :foreground
,base02 :height ,apropospriate-mode-line-height))))
+ :background ,base00+1 :foreground
,base02
+ :height ,(or
apropospriate-mode-line-height 1.0)))))
`(mode-line-buffer-id ((,class (:foreground unspecified :background
nil))))
`(mode-line-emphasis ((,class (:foreground ,base02 :slant italic))))
`(mode-line-highlight ((,class (:foreground ,base02 :box nil))))
- `(powerline-active1 ((,class (:background ,base00 :height
,apropospriate-mode-line-height))))
- `(powerline-active2 ((,class (:background ,base00+1 :height
,apropospriate-mode-line-height))))
- `(powerline-inactive1 ((,class (:background ,base00+1 :height
,apropospriate-mode-line-height))))
- `(powerline-inactive2 ((,class (:background ,base00+1 :height
,apropospriate-mode-line-height))))
+ `(powerline-active1 ((,class (:background ,base00 :height ,(or
apropospriate-mode-line-height 1.0)))))
+ `(powerline-active2 ((,class (:background ,base00+1 :height ,(or
apropospriate-mode-line-height 1.0)))))
+ `(powerline-inactive1 ((,class (:background ,base00+1 :height ,(or
apropospriate-mode-line-height 1.0)))))
+ `(powerline-inactive2 ((,class (:background ,base00+1 :height ,(or
apropospriate-mode-line-height 1.0)))))
`(alert-trivial-face ((,class (:inherit nil :foreground nil :background
nil))))
`(anzu-mode-line ((,class (:foreground ,yellow))))
`(persp-selected-face ((,class (:foreground ,base03))))
