summary refs log tree commit diff
diff options
context:
space:
mode:
authorFranck Cuny <franck.cuny@gmail.com>2016-11-20 09:42:24 -0800
committerFranck Cuny <franck.cuny@gmail.com>2016-11-20 09:42:24 -0800
commit7a25e5873e3e17d520247d53caea35fdb45bdf38 (patch)
tree15271d25853564a5d46413defda3b7b6755d4b98
parent[Emacs] Use spaceline to manage the mode-line. (diff)
downloademacs.d-7a25e5873e3e17d520247d53caea35fdb45bdf38.tar.gz
[Emacs] Some updates to my own theme.
-rw-r--r--emacs.d/lib/basic-theme.el15
1 files changed, 7 insertions, 8 deletions
diff --git a/emacs.d/lib/basic-theme.el b/emacs.d/lib/basic-theme.el
index 8d25caa..4d49e69 100644
--- a/emacs.d/lib/basic-theme.el
+++ b/emacs.d/lib/basic-theme.el
@@ -23,21 +23,20 @@
     sh-quoted-exec
     fringe))
 
-(let ((bg           "#FFFFE8")
+(let ((bg           "#fdfaf5")
       (black        "#000")
-      (white        "#fff")
-      (cyan-light   "#e6fafa")
-      (highlight    "#e8eb98"))
+      (white        "#fff"))
   (apply 'custom-theme-set-faces 'basic
          `(default ((t (:foreground ,black :background ,bg))))
-         `(mode-line ((t (:background ,cyan-light :box (:line-width 1)))))
-         `(mode-line-inactive ((t (:background ,cyan-light :box (:line-width -1 :style pressed-button)))))
+         `(mode-line ((t (:foreground: black :background "#CACACA" :box nil))))
+         `(mode-line-inactive ((t (:foreground "grey20" :background "grey90" :box nil))))
          `(cursor ((t (:background ,black :foreground ,white))))
+         `(hl-line ((t (:background "#e5e4e2"))))
          `(font-lock-comment-face ((t (:foreground ,black :weight bold))))
          `(font-lock-comment-delimiter-face ((t (:foreground ,black :weight bold))))
          `(font-lock-doc-face ((t (:foreground ,black :weight bold))))
-         `(region ((t (:background ,highlight))))
-         `(highlight ((t (:background ,highlight))))
+         `(region ((t (:background "#f9b593"))))
+         `(highlight ((t (:background "darkseagreen2"))))
          (mapcar (lambda (n) `(,n ((t (:background ,bg :foreground ,black))))) basic-faces)))
 
 ;;;###autoload