custom theme based on plastic colors

user-global/themes/plastic-theme.el

@@ -1,9 +1,12 @@
-;; Theme based on plastic color
+;;; Plastic --- a theme based on plastic colors
 
-;; to figure out face properties of point:
-;; M-x describe-text-properties
-;; or
-;; C-u C-x =
+;;; Commentary:
+;;; to figure out face properties of point:
+;;; M-x describe-text-properties
+;;; or
+;;; C-u C-x =
+
+;;; Code:
 
 (deftheme plastic "A dark color theme for Emacs")
 
@@ -16,7 +19,7 @@
       (*keywords*          "#61afef")
       (*line-number*       "#615953")
       (*method-declaration* "#e7c547")
-      (*mode-line-bg*       "#ff0000")
+      (*mode-line-bg*       "#21252b")
       (*warnings*           "#ff0000")
       (*operators*          "#e06c75")
       (*visual-selection*   "#b48ead"))
@@ -49,6 +52,15 @@
    `(line-number ((t (:foreground, *comments*))))
    `(company-tooltip ((t (:background, *background* :foreground, *normal*))))
    `(company-tooltip-selection ((t (:background, *current-line* :foreground, *constants*))))
+   `(mode-line ((t (:background, *mode-line-bg* :foreground, *constants*))))
+   `(mode-line-inactive ((t (:background, *mode-line-bg* :foreground, *comments*))))
+
+   ;; swiper
+   `(ivy-current-match ((t (:background, *constants* :foreground, *background*))))
+   
+   ;; web-mode
+   `(web-mode-html-tag-face ((t (:foreground, *keywords*))))
+   `(web-mode-doctype-face ((t (:foreground, *normal*))))
 
    ;; show-paren
    `(show-paren-mismatch ((t (:background, *warnings*, :foreground, *normal* :weight bold))))
@@ -63,3 +75,5 @@
                (file-name-as-directory (file-name-directory load-file-name))))
 
 (provide-theme 'plastic)
+
+;;; plastic-theme.el ends here