branch: externals/nano-theme
commit c437aeae9d5e0fed718423aeb093e80f757b72a1
Merge: 696ceedbf5 7eabad7440
Author: Nicolas P. Rougier <nicolas.roug...@inria.fr>
Commit: GitHub <nore...@github.com>
Merge pull request #45 from akurth/master
Make window-divider visibility customizable.
---
nano-theme-support.el | 28 ++++++++++++++++++++--------
1 file changed, 20 insertions(+), 8 deletions(-)
diff --git a/nano-theme-support.el b/nano-theme-support.el
index eb0324b02d..69b4f8c22a 100644
--- a/nano-theme-support.el
+++ b/nano-theme-support.el
@@ -150,6 +150,10 @@
"Whether to use font stack"
:type 'boolean :group 'nano-theme-fonts)
+(defcustom nano-window-divider-show nil
+ "Whether to show the vertical window-divider"
+ :type 'boolean :group 'nano-theme)
+
(defface nano-mono
'((t (:family "Roboto Mono"
:height 140
@@ -584,6 +588,22 @@ background color that is barely perceptible."
`(nano-strong ((,light (:weight bold :foreground ,nano-light-strong))
(,dark (:weight bold :foreground
,nano-dark-strong))))))
+ ;; --- Window divider ----------------------------------------------
+ (if nano-window-divider-show
+ (custom-theme-set-faces theme
+ `(window-divider ((,light (:foreground ,nano-light-foreground))
+ (,dark (:foreground ,nano-dark-foreground))))
+ `(vertical-border ((,light (:foreground ,nano-light-foreground))
+ (,dark (:foreground ,nano-dark-foreground)))))
+ (custom-theme-set-faces theme
+ `(window-divider ((,light (:foreground ,nano-light-background))
+ (,dark (:foreground ,nano-dark-background))))
+ `(vertical-border ((,light (:foreground ,nano-light-background))
+ (,dark (:foreground ,nano-dark-background))))))
+ (custom-theme-set-faces theme
+ '(window-divider-first-pixel ((t (:inherit window-divider))))
+ '(window-divider-last-pixel ((t (:inherit window-divider)))))
+
(custom-theme-set-faces theme
@@ -749,14 +769,6 @@ background color that is barely perceptible."
'(tty-menu-enabled-face ((t (:inherit nano-default-i))))
'(tty-menu-selected-face ((t (:inherit nano-salient-i))))
- ;; --- Windows divider ----------------------------------------------
- `(window-divider ((,light (:foreground
,nano-light-background))
- (,dark (:foreground ,nano-dark-background))))
- '(window-divider-first-pixel ((t (:inherit window-divider))))
- '(window-divider-last-pixel ((t (:inherit window-divider))))
- `(vertical-border ((,light (:foreground
,nano-light-background))
- (,dark (:foreground ,nano-dark-background))))
-
;; --- Tab bar ------------------------------------------------------
'(tab-bar ((t (:inherit default))))
'(tab-bar-tab ((t (:inherit default))))
