maciej/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Update the not harmonic theme

Browse source
This commit is contained in:
Maciej 2019-04-02 10:45:07 +03:00
parent f564116114
commit 3d23b5376f
Signed by: maciej
GPG key ID: 41D62D42D3B0D765
2 changed files with 23 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

21
10themes-base16-not-harmonic.el
View file

@ -32,6 +32,27 @@
;; Add all the faces to the theme ;; Add all the faces to the theme
(base16-theme-define 'base16-not-harmonic base16-not-harmonic-colors) (base16-theme-define 'base16-not-harmonic base16-not-harmonic-colors)
;; Customise things
(custom-theme-set-faces
'base16-not-harmonic
'(cursor ((t (:background "#568bbf"))))
'(font-lock-comment-delimiter-face ((t (:foreground "#aabcce"))))
'(mode-line ((t (:font "Hasklig 16"))))
'(fringe ((t (:background "#2c3a47" :slant normal))))
'(diff-refine-added ((t (:background "#56bf8b" :foreground "#2c3a47"))))
'(diff-refine-removed ((t (:background "#bf5656" :foreground "#2c3a47"))))
'(diff-refine-changed ((t (:background "#bfbf56" :foreground "#2c3a47"))))
'(magit-diff-added ((t (:background "#56bf8b" :foreground "#2c3a47"))))
'(magit-diff-added-highlight ((t (:background "#8bbf56" :foreground "#2c3a47"))))
'(magit-diff-our ((t (:background "#bf5656" :foreground "#2c3a47"))))
'(magit-diff-our-highlight ((t (:background "#bf568b" :foreground "#2c3a47"))))
'(magit-diff-removed ((t (:background "#bf5656" :foreground "#2c3a47"))))
'(magit-diff-removed-highlight ((t (:background "#bf568b" :foreground "#2c3a47")))))
;; Mark the theme as provided ;; Mark the theme as provided
(provide-theme 'base16-not-harmonic) (provide-theme 'base16-not-harmonic)

12
10themes.el
View file

@ -5,7 +5,7 @@
(setq-default display-time-format "%H:%M") ;; time format to display on mode line (setq-default display-time-format "%H:%M") ;; time format to display on mode line
(sml/setup) (sml/setup)
(load "~/.emacs.d/10themes-base16-not-harmonic.el") (load "~/.emacs.d/10themes-base16-not-harmonic.el" t)
(load-theme 'base16-mexico-light t t) (load-theme 'base16-mexico-light t t)
(load-theme 'manoj-dark t t) (load-theme 'manoj-dark t t)
(load-theme 'base16-one-light t t) (load-theme 'base16-one-light t t)
@ -14,18 +14,10 @@
"Additional configuration for Base16 theme." "Additional configuration for Base16 theme."
(set-face-attribute 'mode-line nil :font "Hasklig 15")) (set-face-attribute 'mode-line nil :font "Hasklig 15"))
(defun base16-harmonic-custom ()
"Additional configuration for Base 16 theme."
(set-face-attribute 'font-lock-comment-delimiter-face nil
:foreground "#aabcce")
(set-face-attribute 'mode-line nil :font "Hasklig 15")
(set-face-attribute 'fringe nil :background "#2c3a47"
:slant 'normal))
(if (display-graphic-p) (if (display-graphic-p)
(progn (progn
(sml/apply-theme 'respectful) (sml/apply-theme 'respectful)
(enable-theme 'base16-one-light)) (enable-theme 'base16-not-harmonic))
(progn (progn
(enable-theme 'manoj-dark))) (enable-theme 'manoj-dark)))