branch: externals/nano-theme
commit 99ff1c5e78296a073c6e63b966045e0d83a136e7
Author: Nicolas P. Rougier <[email protected]>
Commit: Nicolas P. Rougier <[email protected]>
Removed automatic start
---
nano-theme.el | 48 +++++++++++++++++++++++++++---------------------
1 file changed, 27 insertions(+), 21 deletions(-)
diff --git a/nano-theme.el b/nano-theme.el
index 8a9e1e4..0344066 100644
--- a/nano-theme.el
+++ b/nano-theme.el
@@ -1,8 +1,7 @@
-;;; nano-theme.el --- A consistent theme for GNU Emacs -*- coding: utf-8 -*-
-
+;;; nano-theme.el --- NΛNO theme -*- lexical-binding: t -*-
;; ---------------------------------------------------------------------
-;; GNU Emacs / N Λ N O theme
-;; Copyright (C) 2021 - Nicolas P. Rougier
+;; GNU Emacs / NΛNO theme
+;; Copyright (C) 2020-2021 - NΛNO developers
;;
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@@ -19,30 +18,34 @@
;; ---------------------------------------------------------------------
(deftheme nano
- "N Λ N O theme")
+ "NΛNO Theme")
(defgroup nano nil
- "N Λ N O theme.")
+ "NΛNO")
(defgroup nano-light nil
- "Color palette for light theme" :group 'nano)
+ "Light theme color palette" :group 'nano)
(defgroup nano-dark nil
- "Color palette for dark theme" :group 'nano)
+ "Dark theme color palette" :group 'nano)
+
+(defgroup nano-fonts nil
+ "Dark & Light theme fonts" :group 'nano)
+
(defface nano-mono
'((t (:family "Roboto Mono"
:height 140
:weight light)))
"Default monospaced font (Roboto Mono Light, 14pt)."
- :group 'nano)
+ :group 'nano-fonts)
(defface nano-mono-alt
'((t (:family "Fira Code"
:height 140
:weight light)))
"Alternative monospaced font (Fira Code Light, 14pt)."
- :group 'nano)
+ :group 'nano-fonts)
(defface nano-sans
@@ -50,14 +53,14 @@
:height 140
:weight light)))
"Default proportional sans font (Roboto Light, 14pt)."
- :group 'nano)
+ :group 'nano-fonts)
(defface nano-serif
'((t (:family "Roboto Slab"
:height 140
:weight light)))
"Default proportional serif font (Roboto Slab Light, 14pt)."
- :group 'nano)
+ :group 'nano-fonts)
(defcustom nano-light-foreground "#37474F" ;; Blue Grey / L800
"Default foreground color"
@@ -279,11 +282,12 @@ background color that is barely perceptible."
(push tag properties)))))
properties)))
-;; (custom-theme-set-faces 'nano
-;; '(bold ((t (:inherit nano-strong)))))
-;;
-;; (custom-theme-set-faces 'nano
-;; `(bold ((t ,(inherit 'nano-strong)))))
+(custom-set-faces
+ `(bold ((t ,(inherit 'nano-strong)))))
+
+(custom-theme-set-faces 'nano
+ `(bold ((t ,(inherit 'nano-popout) t))))
+
;; --- Theme ----------------------------------------------------------
@@ -327,8 +331,8 @@ background color that is barely perceptible."
(,dark (:foreground ,nano-dark-background
:background ,nano-dark-faded))))
- `(nano-default ((,light (:inherit default))
- (,dark (:inherit default))))
+ `(nano-default ((,light (:foreground ,nano-light-foreground))
+ (,dark (:foreground ,nano-dark-foreground))))
`(nano-default-i ((,light (:foreground ,nano-light-background
:background ,nano-light-foreground))
@@ -371,9 +375,11 @@ background color that is barely perceptible."
:background ,nano-dark-critical))))
`(nano-critical-i ((,light (:foreground ,nano-light-critical
- :background ,nano-light-background))
+ ;; :background ,nano-light-background
+ ))
(,dark (:foreground ,nano-dark-critical
- :background ,nano-dark-background))))
+ ;; :background ,nano-dark-background
+ ))))
;; --- Header & mode line -------------------------------------------
