Skip to content

Instantly share code, notes, and snippets.

@mkaito
Last active August 29, 2015 14:04
Show Gist options
  • Save mkaito/ab45709e7115850dc2b8 to your computer and use it in GitHub Desktop.
Save mkaito/ab45709e7115850dc2b8 to your computer and use it in GitHub Desktop.
;;; ultra-pastel-theme.el --- A very pastel color theme
;;
;;; Commentary:
;; Colours based off my ultra-pastel Xresources theme.
;;; Code:
(deftheme ultra-pastel)
(let ((background "#120d0a")
(current-line "#25211F")
(selection "#554B48")
(foreground "#b9b4b2")
(comment "#8a7a60")
(cursor "#dad5d2")
(red "#8a626a")
(orange "#7f6282")
(yellow "#8a7a60")
(green "#728560")
(aqua "#688577")
(blue "#686c82")
(purple "#b6b6be"))
(custom-theme-set-faces
'ultra-pastel
;; Built-in stuff (Emacs 23)
`(default ((t (:background ,background :foreground ,foreground))))
`(fringe ((t (:background ,background))))
`(minibuffer-prompt ((t (:foreground ,blue))))
`(mode-line ((t (:background ,background :foreground ,foreground))))
`(region ((t (:background ,selection))))
;; Font-lock stuff
`(font-lock-comment-face ((t (:foreground ,comment))))
`(font-lock-constant-face ((t (:foreground ,green))))
`(font-lock-doc-string-face ((t (:foreground ,comment))))
`(font-lock-function-name-face ((t (:foreground ,blue))))
`(font-lock-keyword-face ((t (:foreground ,purple))))
`(font-lock-string-face ((t (:foreground ,aqua))))
`(font-lock-type-face ((t (:foreground ,yellow))))
`(font-lock-variable-name-face ((t (:foreground ,red))))
`(font-lock-warning-face ((t (:foreground ,red))))
;; hl-line-mode
`(hl-line ((t (:background ,current-line))))
;; linum-mode
`(linum ((t (:background ,background :foreground ,aqua))))
;; org-mode
`(org-date ((t (:foreground ,purple))))
`(org-done ((t (:foreground ,green))))
`(org-hide ((t (:foreground ,current-line))))
`(org-link ((t (:foreground ,blue))))
`(org-todo ((t (:foreground ,red))))
;; show-paren-mode
`(show-paren-match ((t (:background ,background :foreground ,blue))))
`(show-paren-mismatch ((t (:background ,background :foreground ,red))))
;; rainbow-delimiters
`(rainbow-delimiters-depth-1-face ((t (:foreground ,purple))))
`(rainbow-delimiters-depth-2-face ((t (:foreground ,blue))))
`(rainbow-delimiters-depth-3-face ((t (:foreground ,aqua))))
`(rainbow-delimiters-depth-4-face ((t (:foreground ,green))))
`(rainbow-delimiters-depth-5-face ((t (:foreground ,yellow))))
`(rainbow-delimiters-depth-6-face ((t (:foreground ,orange))))
`(rainbow-delimiters-depth-7-face ((t (:foreground ,red))))
`(rainbow-delimiters-depth-8-face ((t (:foreground ,comment))))
`(rainbow-delimiters-depth-9-face ((t (:foreground ,foreground)))))
(custom-theme-set-variables
'ultra-pastel
`(ansi-color-names-vector
;; black, red, green, yellow, blue, magenta, cyan, white
[,background ,red ,green ,yellow ,blue ,purple ,blue ,foreground])
`(ansi-term-color-vector
;; black, red, green, yellow, blue, magenta, cyan, white
[unspecified ,background ,red ,green ,yellow ,blue ,purple ,blue ,foreground])))
(provide-theme 'ultra-pastel)
;;; ultra-pastel-theme.el ends here
! --- special colors ---
*background: #120d0a
*foreground: #b9b4b2
! --- standard colors ---
! black
*color0: #120d0a
! bright_black
*color8: #332d2b
! red
*color1: #8a626a
! bright_red
*color9: #c6b0b3
! green
*color2: #728560
! bright_green
*color10: #bbc1ae
! yellow
*color3: #8a7a60
! bright_yellow
*color11: #c6bcae
! blue
*color4: #686c82
! bright_blue
*color12: #b6b6be
! magenta
*color5: #7f6282
! bright_magenta
*color13: #c2b0be
! cyan
*color6: #688577
! bright_cyan
*color14: #b6c1ba
! white
*color7: #b9b4b2
! bright_white
*color15: #dad5d2
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment