Skip to content

Instantly share code, notes, and snippets.

@cpetzold
Created August 11, 2014 20:52
Show Gist options
  • Save cpetzold/a3b003785dba04efba2d to your computer and use it in GitHub Desktop.
Save cpetzold/a3b003785dba04efba2d to your computer and use it in GitHub Desktop.
(deftheme prismatic "Always interesting!")
(let ((prismatic-gray-darkest "#141411")
(prismatic-gray-darker "#202026")
(prismatic-gray-dark "#666666")
(prismatic-gray "#a2a6a6")
(prismatic-gray-light "#bfbfbf")
(prismatic-gray-lighter "#e5e5e5")
(prismatic-gray-lightest "#f2f2f2")
(prismatic-white "#ffffff")
(prismatic-orange-light "#ff8359")
(prismatic-orange-medium "#ff7040")
(prismatic-orange-dark "#ff5c26")
(prismatic-green-light "#43bfbf")
(prismatic-green-medium "#3aa6a6")
(prismatic-green-dark "#318c8c")
(prismatic-red "#ee5f64")
(prismatic-yellow "#ffbf00")
(prismatic-green "#A6E22A")
(prismatic-blue-light "#89BDFF")
(prismatic-magenta "#F92672")
(prismatic-purple "#AE81FF")
(prismatic-purple-light "#FD5FF1")
)
(custom-theme-set-faces
'prismatic
;; Frame
`(default ((t (:foreground ,prismatic-gray-light :background ,prismatic-gray-darker))))
`(cursor ((t (:foreground ,prismatic-orange-light))))
`(hl-line ((t (:background ,prismatic-gray-darkest))))
`(minibuffer-prompt ((t (:foreground ,prismatic-gray-dark))))
`(modeline ((t (:background ,prismatic-gray-darkest :foreground ,prismatic-gray-light))))
`(region ((t (:background ,prismatic-gray-darkest))))
`(show-paren-match ((t (:foreground ,prismatic-white :background ,prismatic-gray-darker :weight ultra-bold))))
;; Main
`(font-lock-builtin-face ((t (:foreground ,prismatic-white :weight bold))))
`(font-lock-comment-face ((t (:foreground ,prismatic-gray-dark))))
`(font-lock-doc-string-face ((t (:foreground ,prismatic-gray-dark))))
`(font-lock-constant-face ((t (:foreground ,prismatic-blue-light))))
`(font-lock-function-name-face ((t (:foreground ,prismatic-orange-light))))
`(font-lock-keyword-face ((t (:foreground ,prismatic-white :weight bold))))
`(font-lock-string-face ((t (:foreground ,prismatic-green-light))))
`(font-lock-type-face ((t (:foreground ,prismatic-blue-light :weight bold))))
`(font-lock-variable-name-face ((t (:foreground ,prismatic-magenta))))
`(font-lock-warning-face ((t (:bold t :foreground ,prismatic-purple-light))))
;; CUA
`(cua-rectangle ((t (:background ,prismatic-gray-darkest))))
;; IDO
`(ido-first-match ((t (:foreground ,prismatic-purple))))
`(ido-only-match ((t (:foreground ,prismatic-green))))
`(ido-subdir ((t (:foreground ,prismatic-blue-light))))
;; ECB
`(ecb-default-highlight-face ((t (:foreground ,prismatic-green))))
;; Whitespace
`(whitespace-space ((t (:foreground ,prismatic-gray))))
;; Yasnippet
`(yas/field-highlight-face ((t (:background ,prismatic-gray-darker))))))
(when load-file-name
(add-to-list 'custom-theme-load-path
(file-name-as-directory (file-name-directory load-file-name))))
(provide-theme 'prismatic)
""
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment