semi-dark-theme for default
This commit is contained in:
parent
2393b459e6
commit
b919cdf1d2
@ -8,6 +8,7 @@
|
||||
:ensure t
|
||||
:bind
|
||||
("C-x t d" . dark-theme)
|
||||
("C-x t s" . semi-dark-theme)
|
||||
("C-x t l" . light-theme)
|
||||
|
||||
:init
|
||||
@ -24,35 +25,60 @@
|
||||
(load-theme 'doom-molokai)
|
||||
(delete-selection-mode 1)
|
||||
;; Invoke customcolors
|
||||
(customcolors)
|
||||
(darkcolor)
|
||||
)
|
||||
|
||||
(defun semi-dark-theme ()
|
||||
"Activate semi-dark colortheme"
|
||||
(interactive)
|
||||
(load-theme 'doom-molokai)
|
||||
(delete-selection-mode 1)
|
||||
;; Invoke customcolors
|
||||
(semidarkcolor)
|
||||
)
|
||||
|
||||
;; Invoke theme
|
||||
(load-theme 'doom-molokai t)
|
||||
(load-theme 'doom-molokai t) ;; global
|
||||
|
||||
:config
|
||||
(defun customcolors ()
|
||||
"Simple customcolors for theme."
|
||||
(defun darkcolor ()
|
||||
"Simple dark for theme."
|
||||
(set-cursor-color "#2979FF")
|
||||
(set-face-background 'highlight "#2979FF")
|
||||
;; (set-background-color "#1C1E1F") ;; semi-dark
|
||||
(set-background-color "#101418") ;; dark
|
||||
(set-background-color "#101418")
|
||||
|
||||
;; Modeline
|
||||
;; (set-face-background 'mode-line "#131313") ;; semi-dark
|
||||
(set-face-background 'mode-line "#0C0E10") ;; dark
|
||||
(set-face-background 'mode-line "#0C0E10")
|
||||
(set-face-background 'modeline-inactive "#333333")
|
||||
;; (set-face-foreground 'mode-line "#FFFFFF")
|
||||
|
||||
;; Fix linum current-line highlight
|
||||
(defface my-linum-hl
|
||||
;; '((t :background "#131313" :foreground "gold")) ;; semi-dark
|
||||
'((t :background "#0C0E10" :foreground "gold")) ;; dark
|
||||
'((t :background "#0C0E10" :foreground "gold"))
|
||||
"Face for the currently active Line number"
|
||||
:group 'linum)
|
||||
)
|
||||
|
||||
;; Invoke customcolors
|
||||
(customcolors)
|
||||
(defun semidarkcolor ()
|
||||
"Simple semidarkcolor for theme."
|
||||
(set-cursor-color "#2979FF")
|
||||
(set-face-background 'highlight "#2979FF")
|
||||
(set-background-color "#1C1E1F")
|
||||
|
||||
;; Modeline
|
||||
(set-face-background 'mode-line "#2D2E2E")
|
||||
(set-face-background 'modeline-inactive "#333333")
|
||||
;; (set-face-foreground 'mode-line "#FFFFFF")
|
||||
|
||||
;; Fix linum current-line highlight
|
||||
(defface my-linum-hl
|
||||
'((t :background "gray20" :foreground "gold"))
|
||||
"Face for the currently active Line number"
|
||||
:group 'linum)
|
||||
)
|
||||
|
||||
;; Invoke color
|
||||
(semidarkcolor) ;; default
|
||||
)
|
||||
|
||||
(provide 'init-theme)
|
||||
|
Loading…
x
Reference in New Issue
Block a user