Update themes

themes/base16-summerfruit-light-modified-theme.el

@@ -0,0 +1,40 @@
+;;; base16-summerfruit-light-modified-theme.el --- summary
+;;; Commentary:
+
+;; Author: Maciej Szlosarczyk
+;; Maintainer: Maciej Szlosarczyk
+;; Version: 0.1-snapshot
+
+;;; Code:
+
+(require 'base16-theme)
+
+(defvar base16-summerfruit-light-modified-colors
+  '(:base00 "#fdfcfa"
+    :base01 "#e0e0e0"
+    :base02 "#d0d0d0"
+    :base03 "#b0b0b0"
+    :base04 "#000000"
+    :base05 "#101010"
+    :base06 "#151515"
+    :base07 "#202020"
+    :base08 "#ff0086"
+    :base09 "#fd8900"
+    :base0A "#aba800"
+    :base0B "#00c918"
+    :base0C "#1faaaa"
+    :base0D "#3777e6"
+    :base0E "#ad00a1"
+    :base0F "#cc6633")
+  "All colors for Base16 Summerfruit Light are defined here.")
+
+;; Define the theme
+(deftheme base16-summerfruit-light-modified)
+
+;; Add all the faces to the theme
+(base16-theme-define 'base16-summerfruit-light-modified base16-summerfruit-light-modified-colors)
+
+;; Mark the theme as provided
+(provide-theme 'base16-summerfruit-light-modified)
+(provide 'themes/base16-summerfruit-light-modified-theme)
+;;; base16-summerfruit-light-modified-theme.el ends here

themes/themes.el

@@ -17,30 +17,16 @@
 ;; Disable cursor blinking
 (blink-cursor-mode 0)
 
-(load "$HOME/.emacs.d/themes/themes-base16-not-harmonic.el" 'f 't)
+(load "$HOME/.emacs.d/themes/base16-summerfruit-light-modified-theme" 'f 't)
-(load "$HOME/.emacs.d/themes/themes-base16-zenburn-modified.el" 'f 't)
-(load-theme 'base16-mexico-light t t)
-(load-theme 'base16-ia-dark t t)
-(load-theme 'manoj-dark t t)
-(load-theme 'base16-one-light t t)
-(load-theme 'base16-zenburn t t)
 (load-theme 'base16-atelier-forest-light t t)
 (load-theme 'base16-harmonic-light t t)
-(load-theme 'base16-material-palenight t t)
-(load-theme 'base16-mocha t t)
-(load-theme 'base16-papercolor-light t t)
-(load-theme 'planet t t)
-
-(defun base16-mexico-light-custom ()
-  "Additional configuration for Base16 theme."
-  (set-face-attribute 'mode-line nil :font "IBM Plex Mono 15"))
 
 (if (display-graphic-p)
     (progn
       (sml/apply-theme 'respectful)
       (enable-theme (nth
                      (random 2)
-                     '(base16-mexico-light base16-harmonic-light))))
+                     '(base16-summerfruit-light-modified base16-harmonic-light))))
   (progn
     (defvar base16-theme-256-color-source "base16-shell")
     (enable-theme 'base16-atelier-forest-light)))