61 lines
1.4 KiB
EmacsLisp
61 lines
1.4 KiB
EmacsLisp
;;; init-theme.el --- .Emacs Configuration -*- lexical-binding: t -*-
|
|
;;; Commentary:
|
|
;;
|
|
|
|
;;; Code:
|
|
(use-package doom-themes
|
|
:pin "MELPA"
|
|
:ensure t
|
|
:bind
|
|
("C-x t d" . dark-theme)
|
|
("C-x t l" . light-theme)
|
|
|
|
:init
|
|
(defun light-theme ()
|
|
"Activate light colortheme"
|
|
(interactive)
|
|
(load-theme 'doom-one-light)
|
|
(delete-selection-mode 1)
|
|
)
|
|
|
|
(defun dark-theme ()
|
|
"Activate dark colortheme"
|
|
(interactive)
|
|
(load-theme 'doom-molokai)
|
|
(delete-selection-mode 1)
|
|
;; Invoke customcolors
|
|
(customcolors)
|
|
)
|
|
;; Invoke theme
|
|
(load-theme 'doom-molokai t)
|
|
|
|
:config
|
|
(defun customcolors ()
|
|
"Simple customcolors for theme."
|
|
(set-cursor-color "#2979FF")
|
|
(set-face-background 'highlight "#2979FF")
|
|
;; (set-background-color "#1C1E1F") ;; semi-dark
|
|
(set-background-color "#101418") ;; dark
|
|
|
|
;; Modeline
|
|
;; (set-face-background 'mode-line "#131313") ;; semi-dark
|
|
(set-face-background 'mode-line "#0C0E10") ;; dark
|
|
(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
|
|
"Face for the currently active Line number"
|
|
:group 'linum)
|
|
)
|
|
|
|
;; Invoke customcolors
|
|
(customcolors)
|
|
)
|
|
|
|
(provide 'init-theme)
|
|
|
|
;;; init-theme.el ends here
|