From 5795c1029c11ee40385fa5391aad75871566993b Mon Sep 17 00:00:00 2001 From: defanor Date: Sat, 4 Jun 2016 21:12:42 +0300 Subject: Initial commit --- .emacs.d/blueish-theme.el | 83 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 83 insertions(+) create mode 100644 .emacs.d/blueish-theme.el (limited to '.emacs.d') diff --git a/.emacs.d/blueish-theme.el b/.emacs.d/blueish-theme.el new file mode 100644 index 0000000..632d751 --- /dev/null +++ b/.emacs.d/blueish-theme.el @@ -0,0 +1,83 @@ +;; This program is free software; you can redistribute it and/or modify +;; it under the terms of the GNU General Public License as published by +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. + +;; This program is distributed in the hope that it will be useful, +;; but WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;; GNU General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program. If not, see . + +;; --------------------------- +;; +;; Blueish: a blueish theme. +;; +;; Based on the fogus theme from sublime-themes. +;; +;; ---------------------------- + +(unless (>= emacs-major-version 24) + (error "requires Emacs 24 or later.")) + +(deftheme blueish + "A blueish theme") + +(custom-theme-set-faces + 'blueish + + ;; ----------------- Frame stuff -------------------- + `(default ((((type graphic)) (:background "#091419" :foreground "#c0d0d6")))) + `(cursor ((t (:background "#F8F8F0")))) + `(hl-line ((t (:background "#666666")))) + `(modeline ((t (:background "#183c66" :foreground "white")))) + '(mode-line-inactive ((t (:background "#2f2f3b" :foreground "#d0dfe6" :box nil)))) + `(mode-line ((t (:box nil :foreground "white" :background "#183c66")))) + `(fringe ((((type graphic)) (:background "#14191f")))) + ;; Dir-ed search prompt + `(minibuffer-prompt ((default (:foreground "white")))) + ;; Highlight region color + `(region ((t (:foreground "#FFE792" :background "#1b232c")))) + + ;; ---------------- Code Highlighting --------------- + ;; Builtin + `(font-lock-builtin-face ((t (:foreground "#6ee2ff")))) + ;; Comments + `(font-lock-comment-face ((t (:foreground "#709999")))) + ;; Function names + `(font-lock-function-name-face ((t (:foreground "#effbff")))) + ;; Keywords + `(font-lock-keyword-face ((t (:foreground "#748aa6")))) + ;; Strings + `(font-lock-string-face ((t (:foreground "#6ea0d0")))) + ;; Variables + `(font-lock-variable-name-face ((t (:foreground "#d0dfe6")))) + `(font-lock-type-face ((t (:foreground "#95cc5e")))) + `(font-lock-warning-face ((t (:foreground "white" :bold t)))) + + ;; ---------------- Package Specific Stuff ----------- + ;; circe + `(circe-my-message-face ((t (:foreground "#d0ffff")))) + ;; ido + `(ido-only-match ((t (:foreground "#66ff66")))) + `(ido-subdir ((t (:foreground "#ffaaaa")))) + ;; mail + `(message-header-name ((t (:foreground "#66FF99")))) + ;; w3m + '(w3m-form ((t (:foreground "#ffdddd" :underline t)))) + '(w3m-form-button ((t (:background "#363b40" :foreground "#c0c4c8" :box (:line-width 2 :color "#202020" :style released-button))))) + ) + + +;;;###Autoload +(when load-file-name + (add-to-list 'custom-theme-load-path + (file-name-as-directory (file-name-directory load-file-name)))) + +(provide-theme 'blueish) + +;; Local Variables: +;; no-byte-compile: t +;; End: -- cgit v1.2.3