dotfiles

My personal shell configs and stuff
git clone git://git.alex.balgavy.eu/dotfiles.git
Log | Files | Refs | Submodules | README | LICENSE

commit 7f1771833febe6505b7787e19ea1872201df8a1b
parent 3d4e9dbaa3a59dca0595400536df0fe76dd8f083
Author: Alex Balgavy <a.balgavy@gmail.com>
Date:   Sun, 23 Aug 2020 00:43:18 +0200

emacs: started config anew

Hopefully I'll do it the right way this time.


Former-commit-id: d32db760d79d5f4a934661f275aa91e573ec797e
Diffstat:
Mdot.map | 2+-
Memacs/emacs | 216++-----------------------------------------------------------------------------
Aemacs/emacs.d/config.org | 168+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Demacs/emacs.d/themes/cyberpunk-theme.el | 895-------------------------------------------------------------------------------
Demacs/emacs.d/themes/dracula-theme.el | 458-------------------------------------------------------------------------------
5 files changed, 172 insertions(+), 1567 deletions(-)

diff --git a/dot.map b/dot.map @@ -44,7 +44,7 @@ Xresources: ~/.Xresources # Emacs config emacs: -- emacs.d/themes: ~/.emacs.d/themes +- emacs.d/config.org: ~/.emacs.d/config.org - emacs: ~/.emacs # All shell configs diff --git a/emacs/emacs b/emacs/emacs @@ -1,213 +1,3 @@ -;; Have to put this to fix a known bug -;; https://www.reddit.com/r/emacs/comments/cdei4p/failed_to_download_gnu_archive_bad_request/ -(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3") -(package-initialize) -(when (memq window-system '(mac ns x)) - (exec-path-from-shell-initialize)) - -;; Set the shell -(setq-default explicit-shell-file-name "/bin/bash") - -;; Set themes -(add-to-list 'custom-theme-load-path "~/.emacs.d/themes") -(load-theme 'cyberpunk t) - -;; Let me press 'y'/'n' to answer yes-or-no questions -(fset 'yes-or-no-p 'y-or-n-p) - -;; Show matching parens -(show-paren-mode 1) - -;; Fuzzy file matching -(setq ido-enable-flex-matching t) -(setq ido-everywhere t) -(ido-mode 1) - -(delete-selection-mode 1) - -(setq org-pandoc-menu-entry (quote ((?m "to markdown and open." org-pandoc-export-to-markdown-and-open) - (?M "as markdown." org-pandoc-export-as-markdown)))) - -(when (require 'org) - (require 'ox-md) - (with-eval-after-load 'ox - (require 'ox-pandoc)) - (global-set-key (kbd "C-c a") 'org-agenda) - (setq org-agenda-files (quote ("~/.emacs.d/todo.org"))) - (define-key global-map (kbd "C-c c") 'org-capture) - (when (require 'org-bullets) - (add-hook 'org-mode-hook (lambda () (org-bullets-mode 1))) - ) - ) -(when (require 'undo-tree) - (global-undo-tree-mode) - ) -(when (require 'expand-region) - (global-set-key (kbd "C-=") 'er/expand-region) - ) -(when (require 'which-key) - (which-key-mode)) -(when (require 'helm) - ;; change default prefix key - (global-set-key (kbd "C-c h") 'helm-command-prefix) - (global-unset-key (kbd "C-x c")) - - ;; helm-M-x - (setq helm-M-x-fuzzy-match t) - (global-set-key (kbd "M-x") 'helm-M-x) - - ;; helm-kill-ring - (global-set-key (kbd "M-y") 'helm-show-kill-ring) - - ;; helm-mini - (global-set-key (kbd "C-x b") 'helm-mini) - (setq helm-buffers-fuzzy-matching t - helm-recentf-fuzzy-match t) - - ;; helm-apropos - (global-set-key (kbd "C-h a") 'helm-apropos) - - ;; helm-find-files - (global-set-key (kbd "C-x C-f") 'helm-find-files) - ) - -;; Haskell stuff -(add-hook 'haskell-mode-hook 'haskell-indentation-mode) -(add-hook 'haskell-mode-hook 'interactive-haskell-mode) - -(setq backup-directory-alist - `((".*" . ,temporary-file-directory))) - (setq auto-save-file-name-transforms - `((".*" ,temporary-file-directory t))) - -(defun kill-other-buffers () - "Kill all other buffers." - (interactive) - (mapc 'kill-buffer (delq (current-buffer) (buffer-list)))) - -;; Custom commands -(defun light () - "Switch to light mode." - (interactive) - (load-theme 'spacemacs-light) - ) - -(defun dark () - "Switch to dark mode." - (interactive) - (load-theme 'cyberpunk) - ) - -(add-hook 'artist-mode-hook (lambda () (setq indent-tabs-mode nil))) - -(setq package-archives - '(("gnu" . "http://elpa.gnu.org/packages/") - ("melpa" . "http://melpa.milkbox.net/packages/"))) - - -;; Add package repositories -(require 'package) -(let* ((no-ssl (and (memq system-type '(windows-nt ms-dos)) - (not (gnutls-available-p)))) - (proto (if no-ssl "http" "https"))) - (when no-ssl - (warn "\ -Your version of Emacs does not support SSL connections, -which is unsafe because it allows man-in-the-middle attacks. -There are two things you can do about this warning: -1. Install an Emacs version that does support SSL and be safe. -2. Remove this warning from your init file so you won't see it again.")) - ;; Comment/uncomment these two lines to enable/disable MELPA and MELPA Stable as desired - (add-to-list 'package-archives (cons "melpa" (concat proto "://melpa.org/packages/")) t) - (when (< emacs-major-version 24) - ;; For important compatibility libraries like cl-lib - (add-to-list 'package-archives (cons "gnu" (concat proto "://elpa.gnu.org/packages/"))))) - - -(require 'multiple-cursors) -(global-set-key (kbd "C-S-c C-S-c") 'mc/edit-lines) -(global-set-key (kbd "C->") 'mc/mark-next-like-this) -(global-set-key (kbd "C-<") 'mc/mark-previous-like-this) -(global-set-key (kbd "C-c C-<") 'mc/mark-all-like-this) - -(custom-set-variables - ;; custom-set-variables was added by Custom. - ;; If you edit it by hand, you could mess it up, so be careful. - ;; Your init file should contain only one such instance. - ;; If there is more than one, they won't work right. - '(blink-cursor-mode t) - '(blink-matching-paren t) - '(custom-enabled-themes (quote (cyberpunk))) - '(custom-safe-themes - (quote - ("7238a72b7ad187001482aa5d803a83df542b9f90aa544b48fdd939672c483680" "bffa9739ce0752a37d9b1eee78fc00ba159748f50dc328af4be661484848e476" "3fd57a3dc99eb0e2ec438555cf801572f649c79513d3a8da7980ab54cf66121b" "eb5c69951164b0768bc281a5dfca5fc02b02f65e1ca92c0636ae5e773e9d7704" "fa2b58bb98b62c3b8cf3b6f02f058ef7827a8e497125de0254f56e373abee088" default))) - '(hl-todo-keyword-faces - (quote - (("TODO" . "#dc752f") - ("NEXT" . "#dc752f") - ("THEM" . "#2d9574") - ("PROG" . "#3a81c3") - ("OKAY" . "#3a81c3") - ("DONT" . "#f2241f") - ("FAIL" . "#f2241f") - ("DONE" . "#42ae2c") - ("NOTE" . "#b1951d") - ("KLUDGE" . "#b1951d") - ("HACK" . "#b1951d") - ("TEMP" . "#b1951d") - ("FIXME" . "#dc752f") - ("XXX+" . "#dc752f") - ("\\?\\?\\?+" . "#dc752f")))) - '(indent-tabs-mode nil) - '(inhibit-startup-screen t) - '(menu-bar-mode nil) - '(org-ascii-text-width 9999999999999999) - '(org-babel-load-languages - (quote - ((awk . t) - (shell . t) - (emacs-lisp . t) - (haskell . t) - (python . t) - (ruby . t)))) - '(org-confirm-babel-evaluate nil) - '(org-entities-user - (quote - (("sqcup" "\\sqcup" nil "" "" "" "⊔") - ("sqcap" "\\sqcap" nil "" "" "" "⊓")))) - '(org-export-headline-levels 6) - '(org-export-with-author nil) - '(org-export-with-latex t) - '(org-export-with-title nil) - '(org-export-with-toc nil) - '(org-pandoc-format-extensions (quote (\(markdown_strict+tex_math_dollars\)))) - '(org-pandoc-options (quote ((standalone . t) (atx-headers . t) (katex . t)))) - '(org-pandoc-options-for-markdown (quote ((wrap . "none")))) - '(org-pretty-entities t) - '(package-check-signature nil) - '(package-selected-packages - (quote - (which-key ox-pandoc chess htmlize expand-region org-bullets undo-tree helm exec-path-from-shell haskell-mode 2048-game spacemacs-theme magit plan9-theme sml-mode rainbow-mode))) - '(pdf-view-midnight-colors (quote ("#655370" . "#fbf8ef"))) - '(sml-compile-commands-alist - (quote - (("CMB.make()" . "all-files.cm") - ("CMB.make()" . "pathconfig") - ("CM.make(\"sources.cm\")" . "sources.cm") - ("use \"load-all\"" . "load-all") - ("CM.make(\"sources.cm\")" . "main.sml")))) - '(tool-bar-mode nil) - '(tooltip-mode nil) - '(version-control t) - '(word-wrap nil) - '(xterm-mouse-mode t)) -(custom-set-faces - ;; custom-set-faces was added by Custom. - ;; If you edit it by hand, you could mess it up, so be careful. - ;; Your init file should contain only one such instance. - ;; If there is more than one, they won't work right. - '(org-code ((t (:foreground "#21b8c7" :height 1.2 :family "Courier")))) - '(tty-menu-disabled-face ((t (:background "color-238" :foreground "color-16")))) - '(tty-menu-enabled-face ((t (:background "red" :foreground "white" :weight bold)))) - '(tty-menu-selected-face ((t (:background "magenta" :foreground "white"))))) - +(setq org-src-tab-acts-natively t) +(defconst config-org (expand-file-name "config.org" user-emacs-directory)) +(org-babel-load-file config-org) diff --git a/emacs/emacs.d/config.org b/emacs/emacs.d/config.org @@ -0,0 +1,168 @@ +* Bootstrap +** Set up automatic file locations + Don't create lockfiles: + + #+BEGIN_SRC emacs-lisp + (setq-default + create-lockfiles nil) + #+END_SRC + + Place autosave files (=#file#=) in ~/.emacs.d/backups/: + + #+BEGIN_SRC emacs-lisp + (setq backup-directory-alist + `(("." . ,(concat user-emacs-directory "backups")))) + #+END_SRC + + Place backup files (=file~=) in ~/.emacs.d/saves/: + + #+BEGIN_SRC emacs-lisp + (setq + backup-by-copying t ; don't clobber symlinks + backup-directory-alist + `(("." . ,(concat user-emacs-directory "saves"))) ; don't litter my fs + delete-old-versions t + kept-new-versions 6 + kept-old-versions 2 + version-control t) ; use versioned backups + #+END_SRC +** Enable installing packages from MELPA +#+BEGIN_SRC emacs-lisp + (require 'package) + (add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/") t) + (package-initialize) +#+END_SRC + +Also bootstrap =use-package=: + +#+BEGIN_SRC emacs-lisp + (unless (package-installed-p 'use-package) + (package-refresh-contents) + (package-install 'use-package)) + + (eval-when-compile (require 'use-package)) +#+END_SRC +** Garbage collection + Garbage-collect on focus-out, Emacs /should/ feel snappier. + + #+BEGIN_SRC emacs-lisp + (add-hook 'focus-out-hook #'garbage-collect) + #+END_SRC + +** Load custom.el + Using the built-in customization interface appends code to init file. + Instead we want that interface to append code to a different file. + + #+BEGIN_SRC emacs-lisp + (setq-default custom-file (expand-file-name "custom.el" user-emacs-directory)) + (when (file-exists-p custom-file) + (load custom-file)) + #+END_SRC + +* Theming + Load the theme. + + #+BEGIN_SRC emacs-lisp + (unless (package-installed-p 'doom-themes) + (package-refresh-contents) + (package-install 'doom-themes)) + + + (use-package doom-themes + :config + ;; Global settings (defaults) + (setq doom-themes-enable-bold t ; if nil, bold is universally disabled + doom-themes-enable-italic t) ; if nil, italics is universally disabled + (load-theme 'doom-one t) + + ;; Enable flashing mode-line on errors + (doom-themes-visual-bell-config) + + ;; Enable custom neotree theme (all-the-icons must be installed!) + (doom-themes-neotree-config) + ;; or for treemacs users + (setq doom-themes-treemacs-theme "doom-colors") ; use the colorful treemacs theme + (doom-themes-treemacs-config) + + ;; Corrects (and improves) org-mode's native fontification. + (doom-themes-org-config)) + #+END_SRC + +* Packages +** emacs-which-key + Minor mode for Emacs that displays the key bindings following your currently entered incomplete command (a prefix) in a popup. + + #+BEGIN_SRC emacs-lisp + (unless (package-installed-p 'which-key) + (package-refresh-contents) + (package-install 'which-key)) + (which-key-mode) + #+END_SRC +** helm + Install if not installed: + + #+BEGIN_SRC emacs-lisp + (unless (package-installed-p 'helm) + (package-refresh-contents) + (package-install 'helm)) + #+END_SRC + + Configure: + + #+BEGIN_SRC emacs-lisp + (use-package helm + :defer nil + :custom + (helm-M-x-always-save-history t) + (helm-display-function 'pop-to-buffer) + (savehist-additional-variables '(extended-command-history)) + (history-delete-duplicates t) + :custom-face + (helm-non-file-buffer ((t (:inherit font-lock-comment-face)))) + (helm-ff-file-extension ((t (:inherit default)))) + (helm-buffer-file ((t (:inherit default)))) + :bind + (("M-x" . helm-M-x) + ("C-x C-f" . helm-find-files) + ("C-x C-b" . helm-buffers-list) + ("C-x b" . helm-buffers-list) + ("C-x C-r" . helm-recentf) + ("C-x C-i" . helm-imenu) + ("M-y" . helm-show-kill-ring)) + :config + (helm-mode) + (savehist-mode)) + #+END_SRC + + I'd also like helm in a popup frame so: +** org + In org mode, I want to use bullets instead of stars. + Also, I add a few expansions + #+BEGIN_SRC emacs-lisp + (use-package org + :config + (unless (package-installed-p 'org-bullets) + (package-refresh-contents) + (package-install 'org-bullets)) + (require 'org-bullets) + (require 'org-tempo) + + :hook + (org-mode . (lambda () (org-bullets-mode 1)))) + #+END_SRC +* Defaults +** Appearance + Highlight the current line + + #+BEGIN_SRC emacs-lisp + (global-hl-line-mode) + (show-paren-mode 1) + #+END_SRC + + Disable some UI elements: + + #+BEGIN_SRC emacs-lisp + (when window-system + (scroll-bar-mode 0) ; Disable scrollbar + (tool-bar-mode 0)); Disable toolbar + #+END_SRC diff --git a/emacs/emacs.d/themes/cyberpunk-theme.el b/emacs/emacs.d/themes/cyberpunk-theme.el @@ -1,895 +0,0 @@ -;;; cyberpunk-theme.el --- Cyberpunk Color Theme - -;; Copyright 2012-2018, Nicholas M. Van Horn - -;; Author: Nicholas M. Van Horn <nvanhorn@protonmail.com> -;; Homepage: https://github.com/n3mo/cyberpunk-theme.el -;; Keywords: color theme cyberpunk -;; Version: 1.21 - -;; This file 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 2, or (at your option) -;; any later version. - -;; This file 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 GNU Emacs; see the file COPYING. If not, write to -;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. -;; - -;; "and he'd still see the matrix in his sleep, bright lattices of logic -;; unfolding across that colorless void..." -;; William Gibson, Neuromancer. - -;;; Commentary: - -;; This theme is a port of Sam Aaron's overtone/emacs-live theme of the -;; same name (https://github.com/overtone/emacs-live). The original theme -;; was designed for use with the color-theme package. This theme adopts -;; the new built-in theme support deftheme. Additionally, this -;; theme strives to offer as many mode-specific customizations as -;; possible, with further tweaks that suit my fancy. - -(deftheme cyberpunk "The Cyberpunk color theme") - -(defcustom cyberpunk-transparent-background nil - "Make transparent background in terminal. (Workaround)") - -(let ((class '((class color) (min-colors 89))) - ;; Cyberpunk palette - (cyberpunk-fg "#dcdccc") - (cyberpunk-bg-1 "#2b2b2b") - (cyberpunk-bg-05 "#383838") - (cyberpunk-bg "#000000") - (cyberpunk-bg+1 "#4f4f4f") - (cyberpunk-bg+2 "#5f5f5f") - (cyberpunk-bg+3 "#6f6f6f") - (cyberpunk-red+1 "#dca3a3") - (cyberpunk-red "#ff0000") - (cyberpunk-red-1 "#8b0000") - (cyberpunk-red-2 "#8b0000") - (cyberpunk-red-3 "#9c6363") - (cyberpunk-red-4 "#8c5353") - (cyberpunk-red-5 "#7F073F") - (cyberpunk-pink "#ff69b4") - (cyberpunk-pink-1 "#ff1493") - (cyberpunk-pink-2 "#cd1076") - (cyberpunk-orange-2 "#FF6400") - (cyberpunk-orange-1 "#ff8c00") ;; DarkOrange - (cyberpunk-orange "#ffa500") - (cyberpunk-yellow "#ffff00") - (cyberpunk-yellow-1 "#FBDE2D") - (cyberpunk-yellow-2 "#d0bf8f") - (cyberpunk-yellow-3 "#D8FA3C") - (cyberpunk-yellow-4 "#E9C062") - (cyberpunk-yellow-5 "#ffd700") - (cyberpunk-green-2 "#006400") - (cyberpunk-green-1 "#2e8b57") - (cyberpunk-green "#00ff00") - (cyberpunk-green+1 "#61CE3C") - (cyberpunk-green+2 "#9fc59f") - (cyberpunk-green+3 "#afd8af") - (cyberpunk-green+4 "#bfebbf") - (cyberpunk-cyan "#93e0e3") - (cyberpunk-blue+1 "#94bff3") - (cyberpunk-blue "#0000ff") ;; blue - (cyberpunk-blue-1 "#7b68ee") ;; medium slate blue - (cyberpunk-blue-2 "#6a5acd") ;; slate blue - (cyberpunk-blue-3 "#add8e6") ;; light blue - (cyberpunk-blue-4 "#b2dfee") ;; LightBlue2 - (cyberpunk-blue-5 "#4c83ff") - (cyberpunk-blue-6 "#96CBFE") - (cyberpunk-blue-7 "#00ffff") - (cyberpunk-blue-8 "#4F94CD") - (cyberpunk-magenta "#dc8cc3") - (cyberpunk-black (if (and cyberpunk-transparent-background - (not (display-graphic-p)) - (eq system-type 'darwin)) - "ARGBBB000000" - "#000000")) - (cyberpunk-black-2 "#0C1021") - (cyberpunk-black-3 "#0A0A0A") - (cyberpunk-gray "#d3d3d3") - (cyberpunk-gray-2 "#8B8989") - (cyberpunk-gray-3 "#919191") - (cyberpunk-gray-4 "#999999") - (cyberpunk-gray-5 "#333333") - (cyberpunk-gray-6 "#1A1A1A") - (cyberpunk-gray-7 "#4D4D4D") - (cyberpunk-gray-8 "#262626") - (cyberpunk-white "#ffffff") - (cyberpunk-white-2 "#F8F8F8") - (cyberpunk-white-3 "#fffafa")) - - (custom-theme-set-faces - 'cyberpunk - '(button ((t (:underline t)))) - `(link ((,class (:foreground ,cyberpunk-yellow :underline t :weight bold)))) - `(link-visited ((,class (:foreground ,cyberpunk-yellow-2 :underline t :weight normal)))) - `(blue ((,class (:foreground ,cyberpunk-blue)))) - `(bold ((,class (:bold t)))) - `(border-glyph ((,class (nil)))) - `(buffers-tab ((,class (:background ,cyberpunk-black-2 :foreground ,cyberpunk-white-2)))) - - ;;; basic coloring - `(default ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-black)))) - `(cursor ((,class (:background ,cyberpunk-fg)))) - `(escape-glyph-face ((,class (:foreground ,cyberpunk-red)))) - `(fringe ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg-1)))) - `(header-line ((,class (:foreground ,cyberpunk-yellow - :background ,cyberpunk-bg-1 - :box (:line-width -1 :style released-button))))) - `(highlight ((,class (:background ,cyberpunk-gray-5)))) - - ;;; compilation - `(compilation-column-face ((,class (:foreground ,cyberpunk-yellow)))) - `(compilation-enter-directory-face ((,class (:foreground ,cyberpunk-green)))) - `(compilation-error-face ((,class (:foreground ,cyberpunk-red-1 :weight bold :underline t)))) - `(compilation-face ((,class (:foreground ,cyberpunk-fg)))) - `(compilation-info-face ((,class (:foreground ,cyberpunk-blue)))) - `(compilation-info ((,class (:foreground ,cyberpunk-green+4 :underline t)))) - `(compilation-leave-directory-face ((,class (:foreground ,cyberpunk-green)))) - `(compilation-line-face ((,class (:foreground ,cyberpunk-yellow)))) - `(compilation-line-number ((,class (:foreground ,cyberpunk-yellow)))) - `(compilation-message-face ((,class (:foreground ,cyberpunk-blue)))) - `(compilation-warning-face ((,class (:foreground ,cyberpunk-yellow-1 :weight bold :underline t)))) - - ;;;;; dired - `(dired-directory ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg-1)))) - `(dired-flagged ((,class (:foreground ,cyberpunk-red)))) - `(dired-header ((,class (:foreground ,cyberpunk-pink :inherit bold)))) - `(dired-ignored ((,class (:inherit shadow)))) - `(dired-mark ((,class (:foreground ,cyberpunk-pink :inherit bold)))) - `(dired-marked ((,class (:foreground ,cyberpunk-magenta :inherit bold)))) - `(dired-perm-write ((,class (:foreground ,cyberpunk-gray :underline t)))) - `(dired-symlink ((,class (:foreground ,cyberpunk-cyan :background ,cyberpunk-bg-1 :inherit bold)))) - `(dired-warning ((,class (:foreground ,cyberpunk-orange-1)))) - - ;;;;; helm - `(helm-bookmark-directory ((,class (:inherit helm-ff-directory)))) - `(helm-bookmark-file ((,class (:foreground ,cyberpunk-fg)))) - `(helm-bookmark-gnus ((,class (:foreground ,cyberpunk-pink-2)))) - `(helm-bookmark-info ((,class (:foreground ,cyberpunk-pink-2)))) - `(helm-bookmark-man ((,class (:foreground ,cyberpunk-pink-2)))) - `(helm-bookmark-w3m ((,class (:foreground ,cyberpunk-pink-2)))) - `(helm-buffer-directory ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-buffer-file ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-buffer-not-saved ((,class (:foreground ,cyberpunk-pink-2 :background ,cyberpunk-gray-6)))) - `(helm-buffer-process ((,class (:foreground ,cyberpunk-blue-8 :background ,cyberpunk-gray-6)))) - `(helm-buffer-saved-out ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-buffer-size ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-candidate-number ((,class (:background ,cyberpunk-gray-6 :foreground ,cyberpunk-blue-8 :inherit bold)))) - `(helm-ff-directory ((,class (:foreground ,cyberpunk-blue-8 :background ,cyberpunk-gray-6 :inherit bold)))) - `(helm-ff-dotted-directory ((,class (:foreground ,cyberpunk-blue-8 :background ,cyberpunk-gray-6 :inherit bold)))) - `(helm-ff-dotted-symlink-directory ((,class (:foreground ,cyberpunk-cyan :background ,cyberpunk-gray-6 :inherit bold)))) - `(helm-ff-executable ((,class (:foreground ,cyberpunk-green+1 :background ,cyberpunk-gray-6 :weight normal)))) - `(helm-ff-file ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6 :weight normal)))) - `(helm-ff-invalid-symlink ((,class (:foreground ,cyberpunk-red :background ,cyberpunk-gray-6 :inherit bold)))) - `(helm-ff-prefix ((,class (:foreground ,cyberpunk-gray-6 :background ,cyberpunk-blue-8 :weight normal)))) - `(helm-ff-symlink ((,class (:foreground ,cyberpunk-cyan :background ,cyberpunk-gray-6 :inherit bold)))) - `(helm-grep-cmd-line ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-grep-file ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-grep-finish ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6)))) - `(helm-grep-lineno ((,class (:foreground ,cyberpunk-pink :background ,cyberpunk-gray-6 :inherit bold)))) - `(helm-grep-match ((,class (:foreground nil :background nil :inherit helm-match)))) - `(helm-header ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-gray-6 :underline nil :box nil)))) - `(helm-header-line-left-margin ((,class (:foreground ,cyberpunk-blue-8 :background ,nil)))) - `(helm-match ((,class (:background ,cyberpunk-gray-5 :foreground ,cyberpunk-blue-5)))) - `(helm-match-item ((,class (:background ,cyberpunk-gray-5 :foreground ,cyberpunk-blue-5)))) - `(helm-moccur-buffer ((,class (:foreground ,cyberpunk-blue-2 :background ,cyberpunk-gray-6)))) - `(helm-selection ((,class (:background ,cyberpunk-gray-7)))) - `(helm-selection-line ((,class (:background ,cyberpunk-gray-8)))) - `(helm-separator ((,class (:foreground ,cyberpunk-pink-2 :background ,cyberpunk-gray-6)))) - `(helm-source-header ((,class (:background ,cyberpunk-pink-2 :foreground ,cyberpunk-gray-6 :inherit bold)))) - `(helm-time-zone-current ((,class (:foreground ,cyberpunk-blue-8 :background ,cyberpunk-gray-6)))) - `(helm-time-zone-home ((,class (:foreground ,cyberpunk-pink-2 :background ,cyberpunk-gray-6)))) - `(helm-visible-mark ((,class (:foreground ,cyberpunk-blue-8 :background ,cyberpunk-black-2)))) - - ;;; grep - `(grep-context-face ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink-1)))) - `(grep-error-face ((,class (:foreground ,cyberpunk-red :weight bold :underline t)))) - `(grep-hit-face ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-red)))) - `(grep-match-face ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink-1)))) - `(match ((,class (:background ,cyberpunk-black :foreground ,cyberpunk-pink-1)))) - - - ;;; multiple-cursors - `(mc/cursor-face ((,class (:inverse-video nil, :background ,cyberpunk-pink :foreground ,cyberpunk-black)))) - - ;; faces used by isearch - `(isearch ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink-1)))) - `(isearch-fail ((,class (:background ,cyberpunk-red-1)))) - - `(lazy-highlight ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-yellow)))) - `(query-replace ((,class (:background ,cyberpunk-gray-5)))) - `(Highline-face ((,class (:background ,cyberpunk-green-1)))) - `(left-margin ((,class (nil)))) - `(toolbar ((,class (nil)))) - `(text-cursor ((,class (:background ,cyberpunk-yellow :foreground ,cyberpunk-black)))) - - `(menu ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg)))) - `(minibuffer-prompt ((,class (:foreground ,cyberpunk-green+1 :background ,cyberpunk-black)))) - `(mode-line - ((,class (:foreground ,cyberpunk-blue-5 - :background ,cyberpunk-gray-5 - :box (:line-width -1 :color ,cyberpunk-blue-5))))) - ;; `(mode-line-buffer-id ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(mode-line-inactive - ((,class (:foreground ,cyberpunk-gray-7 - :background ,cyberpunk-gray-6 - :box (:line-width -1 :color ,cyberpunk-blue-5))))) - `(region ((,class (:background ,cyberpunk-red-5)))) - `(secondary-selection ((,class (:background ,cyberpunk-bg+2)))) - `(trailing-whitespace ((,class (:background ,cyberpunk-red)))) - `(vertical-border ((,class (:foreground ,cyberpunk-gray-5 :background ,cyberpunk-black)))) - - ;;; font lock - `(font-lock-builtin-face ((,class (:foreground ,cyberpunk-blue-5)))) - `(font-lock-comment-face ((,class (:foreground ,cyberpunk-gray-2 :background ,cyberpunk-black :italic t)))) - ;; `(font-lock-comment-delimiter-face ((,class (:foreground ,cyberpunk-green)))) - `(font-lock-constant-face ((,class (:foreground ,cyberpunk-blue-6)))) - ;; `(font-lock-doc-face ((,class (:foreground ,cyberpunk-green+1)))) - `(font-lock-doc-face ((,class (:foreground ,cyberpunk-yellow-1)))) - `(font-lock-function-name-face ((,class (:foreground ,cyberpunk-pink-1)))) - `(font-lock-keyword-face ((,class (:foreground ,cyberpunk-blue-5)))) - ;; `(font-lock-negation-char-face ((,class (:foreground ,cyberpunk-fg)))) - `(font-lock-preprocessor-face ((,class (:foreground ,cyberpunk-gray-3)))) - `(font-lock-string-face ((,class (:foreground ,cyberpunk-green+1)))) - `(font-lock-type-face ((,class (:foreground ,cyberpunk-green+3)))) - `(font-lock-variable-name-face ((,class (:foreground ,cyberpunk-pink)))) - `(font-lock-warning-face ((,class (:foreground ,cyberpunk-pink)))) - `(font-lock-reference-face ((,class (:foreground ,cyberpunk-gray)))) - `(font-lock-regexp-grouping-backslash ((,class (:foreground ,cyberpunk-yellow-4)))) - `(font-lock-regexp-grouping-construct ((,class (:foreground ,cyberpunk-red)))) - - `(c-annotation-face ((,class (:inherit font-lock-constant-face)))) - - `(gui-element ((,class (:background ,cyberpunk-gray-5 :foreground ,cyberpunk-blue-6)))) - - ;;; newsticker - ;; These are currently placeholders that probably look terrible. - ;; Someone who uses newsticker is welcome to change these - `(newsticker-date-face ((,class (:foreground ,cyberpunk-fg)))) - `(newsticker-default-face ((,class (:foreground ,cyberpunk-fg)))) - `(newsticker-enclosure-face ((,class (:foreground ,cyberpunk-green+3)))) - `(newsticker-extra-face ((,class (:foreground ,cyberpunk-bg+2 :height 0.8)))) - `(newsticker-feed-face ((,class (:foreground ,cyberpunk-fg)))) - `(newsticker-immortal-item-face ((,class (:foreground ,cyberpunk-green)))) - `(newsticker-new-item-face ((,class (:foreground ,cyberpunk-blue)))) - `(newsticker-obsolete-item-face ((,class (:foreground ,cyberpunk-red)))) - `(newsticker-old-item-face ((,class (:foreground ,cyberpunk-bg+3)))) - `(newsticker-statistics-face ((,class (:foreground ,cyberpunk-fg)))) - `(newsticker-treeview-face ((,class (:foreground ,cyberpunk-fg)))) - `(newsticker-treeview-immortal-face ((,class (:foreground ,cyberpunk-green)))) - `(newsticker-treeview-listwindow-face ((,class (:foreground ,cyberpunk-fg)))) - `(newsticker-treeview-new-face ((,class (:foreground ,cyberpunk-blue :weight bold)))) - `(newsticker-treeview-obsolete-face ((,class (:foreground ,cyberpunk-red)))) - `(newsticker-treeview-old-face ((,class (:foreground ,cyberpunk-bg+3)))) - `(newsticker-treeview-selection-face ((,class (:foreground ,cyberpunk-yellow)))) - - ;;; external - - ;; full-ack - `(ack-separator ((,class (:foreground ,cyberpunk-fg)))) - `(ack-file ((,class (:foreground ,cyberpunk-blue)))) - `(ack-line ((,class (:foreground ,cyberpunk-yellow)))) - `(ack-match ((,class (:foreground ,cyberpunk-orange :background ,cyberpunk-bg-1 :weigth bold)))) - - ;; auctex - `(font-latex-bold ((,class (:inherit bold)))) - `(font-latex-warning ((,class (:inherit font-lock-warning)))) - `(font-latex-sedate ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(font-latex-string ((,class (:foreground ,cyberpunk-green)))) - `(font-latex-title-4 ((,class (:inherit variable-pitch :weight bold)))) - `(font-latex-sectioning-0 ((,class (:foreground ,cyberpunk-blue :background ,cyberpunk-black :scale 1.5)))) - `(font-latex-sectioning-1 ((,class (:foreground ,cyberpunk-blue :background ,cyberpunk-black :scale 1.5)))) - - ;; auto-complete - `(ac-completion-face ((,class (:background ,cyberpunk-gray-2 :underline t)))) - `(ac-candidate-face ((,class (:background ,cyberpunk-gray-4 :foreground ,cyberpunk-black)))) - `(ac-selection-face ((,class (:background ,cyberpunk-pink-1 :foreground ,cyberpunk-black)))) - `(popup-tip-face ((,class (:background ,cyberpunk-gray-5 :foreground ,cyberpunk-white)))) - `(popup-scroll-bar-foreground-face ((,class (:background ,cyberpunk-black-3)))) - `(popup-scroll-bar-background-face ((,class (:background ,cyberpunk-gray-5)))) - `(popup-isearch-match ((,class (:background ,cyberpunk-black :foreground ,cyberpunk-pink-1)))) - - `(window-number-face ((,class (:background ,cyberpunk-gray-6 :foreground ,cyberpunk-blue-5)))) - - ;; company-mode - `(company-tooltip ((,class (:background ,cyberpunk-gray-2 :foreground ,cyberpunk-yellow)))) - `(company-tooltip-common ((,class (:inherit company-tooltip :foreground ,cyberpunk-blue)))) - `(company-tooltip-common-selection ((,class (:inherit company-tooltip-selection :foreground ,cyberpunk-blue)))) - `(company-tooltip-selection ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink-1)))) - `(company-tooltip-annotation ((,class (:inherit company-tooltip :foreground ,cyberpunk-black-3)))) - `(company-scrollbar-fg ((,class (:background ,cyberpunk-black-3)))) - `(company-scrollbar-bg ((,class (:background ,cyberpunk-gray-5)))) - `(company-preview ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-pink-1)))) - `(company-preview-common ((,class (:foreground ,cyberpunk-gray :background ,cyberpunk-pink-1)))) - - ;; diff - `(diff-added ((,class (:foreground ,cyberpunk-green)))) - `(diff-changed ((,class (:foreground ,cyberpunk-yellow)))) - `(diff-removed ((,class (:foreground ,cyberpunk-red)))) - `(diff-header ((,class (:background ,cyberpunk-bg+2)))) - `(diff-file-header ((,class (:background ,cyberpunk-bg+2 :foreground ,cyberpunk-fg :bold t)))) - - ;; ediff - `(ediff-current-diff-Ancestor ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-pink)))) - `(ediff-current-diff-A ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg-05)))) - `(ediff-current-diff-B ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg+1)))) - `(ediff-current-diff-C ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg+2)))) - `(ediff-even-diff-Ancestor ((,class (:foreground ,cyberpunk-white :background ,cyberpunk-bg-05)))) - `(ediff-even-diff-A ((,class (:foreground ,cyberpunk-white :background ,cyberpunk-bg+1)))) - `(ediff-even-diff-B ((,class (:foreground ,cyberpunk-white :background ,cyberpunk-bg+2)))) - `(ediff-even-diff-C ((,class (:foreground ,cyberpunk-white :background ,cyberpunk-bg+3)))) - `(ediff-fine-diff-Ancestor ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink)))) - `(ediff-fine-diff-A ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-blue-5)))) - `(ediff-fine-diff-B ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-blue-5)))) - `(ediff-fine-diff-C ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-blue-5)))) - `(ediff-odd-diff-Ancestor ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-gray-2)))) - `(ediff-odd-diff-A ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-gray-3)))) - `(ediff-odd-diff-B ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-gray-4)))) - `(ediff-odd-diff-C ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-gray)))) - - ;; ert - `(ert-test-result-expected ((,class (:foreground ,cyberpunk-green+4 :background ,cyberpunk-bg)))) - `(ert-test-result-unexpected ((,class (:foreground ,cyberpunk-red :background ,cyberpunk-bg)))) - - ;; eshell - `(eshell-prompt ((,class (:foreground ,cyberpunk-blue-5 :weight bold)))) - `(eshell-ls-archive ((,class (:foreground ,cyberpunk-magenta :weight bold)))) - `(eshell-ls-backup ((,class (:inherit font-lock-comment)))) - `(eshell-ls-clutter ((,class (:inherit font-lock-comment)))) - `(eshell-ls-directory ((,class (:foreground ,cyberpunk-blue+1 :weight bold)))) - `(eshell-ls-executable ((,class (:foreground ,cyberpunk-red+1 :weight bold)))) - `(eshell-ls-unreadable ((,class (:foreground ,cyberpunk-fg)))) - `(eshell-ls-missing ((,class (:inherit font-lock-warning)))) - `(eshell-ls-product ((,class (:inherit font-lock-doc)))) - `(eshell-ls-special ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(eshell-ls-symlink ((,class (:foreground ,cyberpunk-cyan :weight bold)))) - - ;; flymake - `(flymake-errline ((,class (:foreground ,cyberpunk-red-1 :weight bold :underline t)))) - `(flymake-warnline ((,class (:foreground ,cyberpunk-yellow-1 :weight bold :underline t)))) - - ;; flyspell - `(flyspell-duplicate ((,class (:foreground ,cyberpunk-yellow-1 :weight bold :underline t)))) - `(flyspell-incorrect ((,class (:foreground ,cyberpunk-orange-2 :weight bold :underline t)))) - - ;; erc - `(erc-action-face ((,class (:inherit erc-default-face)))) - `(erc-bold-face ((,class (:weight bold)))) - `(erc-current-nick-face ((,class (:foreground ,cyberpunk-blue :weight bold)))) - `(erc-dangerous-host-face ((,class (:inherit font-lock-warning)))) - `(erc-default-face ((,class (:foreground ,cyberpunk-fg)))) - `(erc-direct-msg-face ((,class (:inherit erc-default)))) - `(erc-error-face ((,class (:inherit font-lock-warning)))) - `(erc-fool-face ((,class (:inherit erc-default)))) - `(erc-highlight-face ((,class (:inherit hover-highlight)))) - `(erc-input-face ((,class (:foreground ,cyberpunk-yellow)))) - `(erc-keyword-face ((,class (:foreground ,cyberpunk-blue :weight bold)))) - `(erc-nick-default-face ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(erc-my-nick-face ((,class (:foreground ,cyberpunk-red :weigth bold)))) - `(erc-nick-msg-face ((,class (:inherit erc-default)))) - `(erc-notice-face ((,class (:foreground ,cyberpunk-green)))) - `(erc-pal-face ((,class (:foreground ,cyberpunk-orange :weight bold)))) - `(erc-prompt-face ((,class (:foreground ,cyberpunk-orange :background ,cyberpunk-bg :weight bold)))) - `(erc-timestamp-face ((,class (:foreground ,cyberpunk-green+1)))) - `(erc-underline-face ((t (:underline t)))) - - ;; gnus - `(gnus-group-mail-1 ((,class (:bold t :inherit gnus-group-mail-1-empty)))) - `(gnus-group-mail-1-empty ((,class (:inherit gnus-group-news-1-empty)))) - `(gnus-group-mail-2 ((,class (:bold t :inherit gnus-group-mail-2-empty)))) - `(gnus-group-mail-2-empty ((,class (:inherit gnus-group-news-2-empty)))) - `(gnus-group-mail-3 ((,class (:bold t :inherit gnus-group-mail-3-empty)))) - `(gnus-group-mail-3-empty ((,class (:inherit gnus-group-news-3-empty)))) - `(gnus-group-mail-4 ((,class (:bold t :inherit gnus-group-mail-4-empty)))) - `(gnus-group-mail-4-empty ((,class (:inherit gnus-group-news-4-empty)))) - `(gnus-group-mail-5 ((,class (:bold t :inherit gnus-group-mail-5-empty)))) - `(gnus-group-mail-5-empty ((,class (:inherit gnus-group-news-5-empty)))) - `(gnus-group-mail-6 ((,class (:bold t :inherit gnus-group-mail-6-empty)))) - `(gnus-group-mail-6-empty ((,class (:inherit gnus-group-news-6-empty)))) - `(gnus-group-mail-low ((,class (:bold t :inherit gnus-group-mail-low-empty)))) - `(gnus-group-mail-low-empty ((,class (:inherit gnus-group-news-low-empty)))) - `(gnus-group-news-1 ((,class (:bold t :inherit gnus-group-news-1-empty)))) - `(gnus-group-news-2 ((,class (:bold t :inherit gnus-group-news-2-empty)))) - `(gnus-group-news-3 ((,class (:bold t :inherit gnus-group-news-3-empty)))) - `(gnus-group-news-4 ((,class (:bold t :inherit gnus-group-news-4-empty)))) - `(gnus-group-news-5 ((,class (:bold t :inherit gnus-group-news-5-empty)))) - `(gnus-group-news-6 ((,class (:bold t :inherit gnus-group-news-6-empty)))) - `(gnus-group-news-low ((,class (:bold t :inherit gnus-group-news-low-empty)))) - `(gnus-header-content ((,class (:inherit message-header-other)))) - `(gnus-header-from ((,class (:inherit message-header-from)))) - `(gnus-header-name ((,class (:inherit message-header-name)))) - `(gnus-header-newsgroups ((,class (:inherit message-header-other)))) - `(gnus-header-subject ((,class (:inherit message-header-subject)))) - `(gnus-summary-cancelled ((,class (:foreground ,cyberpunk-orange)))) - `(gnus-summary-high-ancient ((,class (:foreground ,cyberpunk-blue)))) - `(gnus-summary-high-read ((,class (:foreground ,cyberpunk-green :weight bold)))) - `(gnus-summary-high-ticked ((,class (:foreground ,cyberpunk-orange :weight bold)))) - `(gnus-summary-high-unread ((,class (:foreground ,cyberpunk-fg :weight bold)))) - `(gnus-summary-low-ancient ((,class (:foreground ,cyberpunk-blue)))) - `(gnus-summary-low-read ((t (:foreground ,cyberpunk-green)))) - `(gnus-summary-low-ticked ((,class (:foreground ,cyberpunk-orange :weight bold)))) - `(gnus-summary-low-unread ((,class (:foreground ,cyberpunk-fg)))) - `(gnus-summary-normal-ancient ((,class (:foreground ,cyberpunk-blue+1)))) - `(gnus-summary-normal-read ((,class (:foreground ,cyberpunk-green)))) - `(gnus-summary-normal-ticked ((,class (:foreground ,cyberpunk-orange :weight bold)))) - `(gnus-summary-normal-unread ((,class (:foreground ,cyberpunk-fg)))) - `(gnus-summary-selected ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(gnus-cite-1 ((,class (:foreground ,cyberpunk-yellow-2)))) - `(gnus-cite-10 ((,class (:foreground ,cyberpunk-yellow-1)))) - `(gnus-cite-11 ((,class (:foreground ,cyberpunk-yellow)))) - `(gnus-cite-2 ((,class (:foreground ,cyberpunk-blue-1)))) - `(gnus-cite-3 ((,class (:foreground ,cyberpunk-blue-2)))) - `(gnus-cite-4 ((,class (:foreground ,cyberpunk-green+2)))) - `(gnus-cite-5 ((,class (:foreground ,cyberpunk-green+1)))) - `(gnus-cite-6 ((,class (:foreground ,cyberpunk-green)))) - `(gnus-cite-7 ((,class (:foreground ,cyberpunk-red)))) - `(gnus-cite-8 ((,class (:foreground ,cyberpunk-red-1)))) - `(gnus-cite-9 ((,class (:foreground ,cyberpunk-red-2)))) - `(gnus-group-news-1-empty ((,class (:foreground ,cyberpunk-yellow)))) - `(gnus-group-news-2-empty ((,class (:foreground ,cyberpunk-green+3)))) - `(gnus-group-news-3-empty ((,class (:foreground ,cyberpunk-green+1)))) - `(gnus-group-news-4-empty ((,class (:foreground ,cyberpunk-blue-2)))) - `(gnus-group-news-5-empty ((,class (:foreground ,cyberpunk-blue-3)))) - `(gnus-group-news-6-empty ((,class (:foreground ,cyberpunk-bg+2)))) - `(gnus-group-news-low-empty ((,class (:foreground ,cyberpunk-bg+2)))) - `(gnus-signature ((,class (:foreground ,cyberpunk-yellow)))) - `(gnus-x ((,class (:background ,cyberpunk-fg :foreground ,cyberpunk-bg)))) - - ;; helm - `(helm-header - ((,class (:foreground ,cyberpunk-green - :background ,cyberpunk-bg - :underline nil - :box nil)))) - `(helm-source-header - ((,class (:foreground ,cyberpunk-yellow - :background ,cyberpunk-bg-1 - :underline nil - :weight bold - :box (:line-width -1 :style released-button))))) - `(helm-selection ((,class (:background ,cyberpunk-bg-1 :underline nil)))) - `(helm-selection-line ((,class (:background ,cyberpunk-bg+1)))) - `(helm-visible-mark ((,class (:foreground ,cyberpunk-bg :background ,cyberpunk-yellow-2)))) - `(helm-candidate-number ((,class (:foreground ,cyberpunk-green+4 :background ,cyberpunk-bg-1)))) - `(helm-ff-directory ((,class (:foreground ,cyberpunk-pink :background ,cyberpunk-bg)))) - `(helm-ff-dotted-directory ((,class (:foreground ,cyberpunk-pink :background ,cyberpunk-bg)))) - - ;; hl-line-mode - `(hl-sexp-face ((,class (:background ,cyberpunk-gray-5)))) - `(hl-line-face ((,class (:background ,cyberpunk-gray-5)))) - - ;; ido-mode - `(ido-first-match ((,class (:foreground ,cyberpunk-pink-1 :background ,cyberpunk-black)))) - `(ido-only-match ((,class (:foreground ,cyberpunk-pink-1 :background ,cyberpunk-black)))) - `(ido-subdir ((,class (:foreground ,cyberpunk-gray-4 :backgroun ,cyberpunk-black)))) - `(ido-indicator ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink-1)))) - - ;; js2-mode - `(js2-warning-face ((,class (:underline ,cyberpunk-orange)))) - `(js2-error-face ((,class (:foreground ,cyberpunk-red :weight bold)))) - `(js2-jsdoc-tag-face ((,class (:foreground ,cyberpunk-green-1)))) - `(js2-jsdoc-type-face ((,class (:foreground ,cyberpunk-green+2)))) - `(js2-jsdoc-value-face ((,class (:foreground ,cyberpunk-green+3)))) - `(js2-function-param-face ((,class (:foreground ,cyberpunk-green+3)))) - `(js2-external-variable-face ((,class (:foreground ,cyberpunk-orange)))) - - ;; jabber-mode - `(jabber-roster-user-away ((,class (:foreground ,cyberpunk-green+2)))) - `(jabber-roster-user-online ((,class (:foreground ,cyberpunk-blue-1)))) - `(jabber-roster-user-dnd ((,class (:foreground ,cyberpunk-red+1)))) - `(jabber-rare-time-face ((,class (:foreground ,cyberpunk-green+1)))) - `(jabber-chat-prompt-local ((,class (:foreground ,cyberpunk-blue-1)))) - `(jabber-chat-prompt-foreign ((,class (:foreground ,cyberpunk-red+1)))) - `(jabber-activity-face((,class (:foreground ,cyberpunk-red+1)))) - `(jabber-activity-personal-face ((,class (:foreground ,cyberpunk-blue+1)))) - `(jabber-title-small ((,class (:height 1.1 :weight bold)))) - `(jabber-title-medium ((,class (:height 1.2 :weight bold)))) - `(jabber-title-large ((,class (:height 1.3 :weight bold)))) - - ;; linum-mode - `(linum ((,class (:foreground ,cyberpunk-green+2 :background ,cyberpunk-bg)))) - - ;;linum-relative - `(linum-relative-current-face ((,class (:inherit linum :foreground ,cyberpunk-white :weight bold)))) - - ;; magit - ;; magit headings and diffs - `(magit-section-highlight ((t (:background ,cyberpunk-bg+1)))) - `(magit-section-heading ((t (:foreground ,cyberpunk-blue+1 :weight bold)))) - `(magit-section-heading-selection ((t (:foreground ,cyberpunk-red+1 :weight bold)))) - `(magit-diff-file-heading ((t (:weight bold)))) - `(magit-diff-file-heading-highlight ((t (:background ,cyberpunk-bg+2 :weight bold)))) - `(magit-diff-file-heading-selection ((t (:background ,cyberpunk-bg+2 - :foreground ,cyberpunk-blue-6 :weight bold)))) - `(magit-diff-hunk-heading ((t (:background ,cyberpunk-bg)))) - `(magit-diff-hunk-heading-highlight ((t (:background ,cyberpunk-bg+1)))) - `(magit-diff-hunk-heading-selection ((t (:background ,cyberpunk-bg+1 - :foreground ,cyberpunk-blue-6)))) - `(magit-diff-lines-heading ((t (:background ,cyberpunk-blue-6 - :foreground ,cyberpunk-bg+1)))) - `(magit-diff-added ((t (:foreground ,cyberpunk-blue-5)))) - `(magit-diff-added-highlight ((t (:inherit magit-diff-added :weight bold)))) - `(magit-diff-removed ((t (:foreground ,cyberpunk-magenta)))) - `(magit-diff-removed-highlight ((t (:inherit magit-diff-removed :weight bold)))) - `(magit-diff-context ((t (:foreground ,cyberpunk-gray)))) - `(magit-diff-context-highlight ((t (:inherit magit-diff-context :weight bold)))) - `(magit-diffstat-added ((t (:inherit magit-diff-added)))) - `(magit-diffstat-removed ((t (:inherit magit-diff-removed)))) - ;; magit popup - `(magit-popup-heading ((t (:foreground ,cyberpunk-pink-1 :weight bold)))) - `(magit-popup-key ((t (:foreground ,cyberpunk-blue+1 :weight bold)))) - `(magit-popup-argument ((t (:foreground ,cyberpunk-blue-4 :weight bold)))) - `(magit-popup-disabled-argument ((t (:foreground ,cyberpunk-fg :weight normal)))) - `(magit-popup-option-value ((t (:foreground ,cyberpunk-blue-2 :weight bold)))) - ;; ;; magit process - `(magit-process-ok ((t (:foreground ,cyberpunk-green+1 :weight bold)))) - `(magit-process-ng ((t (:foreground ,cyberpunk-pink-2 :weight bold)))) - ;; ;; magit log - `(magit-log-author ((t (:foreground ,cyberpunk-pink)))) - `(magit-log-date ((t (:foreground ,cyberpunk-gray)))) - `(magit-log-graph ((t (:foreground ,cyberpunk-white-2)))) - ;; ;; magit sequence - `(magit-sequence-pick ((t (:foreground ,cyberpunk-magenta)))) - `(magit-sequence-stop ((t (:foreground ,cyberpunk-green+1)))) - `(magit-sequence-part ((t (:foreground ,cyberpunk-pink-1)))) - `(magit-sequence-head ((t (:foreground ,cyberpunk-blue+1)))) - `(magit-sequence-drop ((t (:foreground ,cyberpunk-orange)))) - `(magit-sequence-done ((t (:foreground ,cyberpunk-gray-2)))) - `(magit-sequence-onto ((t (:foreground ,cyberpunk-gray-2)))) - ;; ;; magit bisect - `(magit-bisect-good ((t (:foreground ,cyberpunk-green+1)))) - `(magit-bisect-skip ((t (:foreground ,cyberpunk-pink-1)))) - `(magit-bisect-bad ((t (:foreground ,cyberpunk-orange)))) - ;; ;; magit blame - `(magit-blame-heading ((t (:background ,cyberpunk-bg+1 :foreground ,cyberpunk-green)))) - `(magit-blame-hash ((t (:background ,cyberpunk-bg+1 :foreground ,cyberpunk-green)))) - `(magit-blame-name ((t (:background ,cyberpunk-bg+1 :foreground ,cyberpunk-pink-1)))) - `(magit-blame-date ((t (:background ,cyberpunk-bg+1 :foreground ,cyberpunk-yellow-1)))) - `(magit-blame-summary ((t (:background ,cyberpunk-bg+1 :foreground ,cyberpunk-blue-4 - :weight bold)))) - ;; ;; magit references etc - `(magit-dimmed ((t (:foreground ,cyberpunk-bg+3)))) - `(magit-hash ((t (:foreground ,cyberpunk-bg+1)))) - `(magit-tag ((t (:foreground ,cyberpunk-pink-1 :weight bold)))) - `(magit-branch-remote ((t (:foreground ,cyberpunk-green+2 :weight bold)))) - `(magit-branch-local ((t (:foreground ,cyberpunk-blue+1 :weight bold)))) - `(magit-branch-current ((t (:foreground ,cyberpunk-green :weight bold :box t)))) - `(magit-head ((t (:foreground ,cyberpunk-blue :weight bold)))) - `(magit-refname ((t (:background ,cyberpunk-bg+2 :foreground ,cyberpunk-fg :weight bold)))) - `(magit-refname-stash ((t (:background ,cyberpunk-bg+2 :foreground ,cyberpunk-fg :weight bold)))) - `(magit-refname-wip ((t (:background ,cyberpunk-bg+2 :foreground ,cyberpunk-fg :weight bold)))) - `(magit-signature-good ((t (:foreground ,cyberpunk-green)))) - `(magit-signature-bad ((t (:foreground ,cyberpunk-red)))) - `(magit-signature-untrusted ((t (:foreground ,cyberpunk-yellow)))) - `(magit-cherry-unmatched ((t (:foreground ,cyberpunk-cyan)))) - `(magit-cherry-equivalent ((t (:foreground ,cyberpunk-magenta)))) - `(magit-reflog-commit ((t (:foreground ,cyberpunk-green)))) - `(magit-reflog-amend ((t (:foreground ,cyberpunk-magenta)))) - `(magit-reflog-merge ((t (:foreground ,cyberpunk-green)))) - `(magit-reflog-checkout ((t (:foreground ,cyberpunk-blue)))) - `(magit-reflog-reset ((t (:foreground ,cyberpunk-red)))) - `(magit-reflog-rebase ((t (:foreground ,cyberpunk-magenta)))) - `(magit-reflog-cherry-pick ((t (:foreground ,cyberpunk-green)))) - `(magit-reflog-remote ((t (:foreground ,cyberpunk-cyan)))) - `(magit-reflog-other ((t (:foreground ,cyberpunk-cyan)))) - - `(eval-sexp-fu-flash ((,class (:background ,cyberpunk-gray-8 :foreground ,cyberpunk-pink-2)))) - - ;; message-mode - `(message-cited-text ((,class (:inherit font-lock-comment)))) - `(message-header-name ((,class (:foreground ,cyberpunk-blue-5)))) - `(message-header-other ((,class (:foreground ,cyberpunk-green)))) - `(message-header-to ((,class (:foreground ,cyberpunk-pink-1 :weight bold)))) - `(message-header-from ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(message-header-cc ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(message-header-newsgroups ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(message-header-subject ((,class (:foreground ,cyberpunk-orange :weight bold)))) - `(message-header-xheader ((,class (:foreground ,cyberpunk-green)))) - `(message-mml ((,class (:foreground ,cyberpunk-yellow :weight bold)))) - `(message-separator ((,class (:inherit font-lock-comment)))) - - ;; mew - `(mew-face-header-subject ((,class (:foreground ,cyberpunk-orange)))) - `(mew-face-header-from ((,class (:foreground ,cyberpunk-yellow)))) - `(mew-face-header-date ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-header-to ((,class (:foreground ,cyberpunk-red)))) - `(mew-face-header-key ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-header-private ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-header-important ((,class (:foreground ,cyberpunk-blue)))) - `(mew-face-header-marginal ((,class (:foreground ,cyberpunk-fg :weight bold)))) - `(mew-face-header-warning ((,class (:foreground ,cyberpunk-red)))) - `(mew-face-header-xmew ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-header-xmew-bad ((,class (:foreground ,cyberpunk-red)))) - `(mew-face-body-url ((,class (:foreground ,cyberpunk-orange)))) - `(mew-face-body-comment ((,class (:foreground ,cyberpunk-fg :slant italic)))) - `(mew-face-body-cite1 ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-body-cite2 ((,class (:foreground ,cyberpunk-blue)))) - `(mew-face-body-cite3 ((,class (:foreground ,cyberpunk-orange)))) - `(mew-face-body-cite4 ((,class (:foreground ,cyberpunk-yellow)))) - `(mew-face-body-cite5 ((,class (:foreground ,cyberpunk-red)))) - `(mew-face-mark-review ((,class (:foreground ,cyberpunk-blue)))) - `(mew-face-mark-escape ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-mark-delete ((,class (:foreground ,cyberpunk-red)))) - `(mew-face-mark-unlink ((,class (:foreground ,cyberpunk-yellow)))) - `(mew-face-mark-refile ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-mark-unread ((,class (:foreground ,cyberpunk-red-2)))) - `(mew-face-eof-message ((,class (:foreground ,cyberpunk-green)))) - `(mew-face-eof-part ((,class (:foreground ,cyberpunk-yellow)))) - - ;; mic-paren - `(paren-face-match ((,class (:foreground ,cyberpunk-cyan :background ,cyberpunk-bg :weight bold)))) - `(paren-face-mismatch ((,class (:foreground ,cyberpunk-bg :background ,cyberpunk-magenta :weight bold)))) - `(paren-face-no-match ((,class (:foreground ,cyberpunk-bg :background ,cyberpunk-red :weight bold)))) - - ;; nav - `(nav-face-heading ((,class (:foreground ,cyberpunk-yellow)))) - `(nav-face-button-num ((,class (:foreground ,cyberpunk-cyan)))) - `(nav-face-dir ((,class (:foreground ,cyberpunk-green)))) - `(nav-face-hdir ((,class (:foreground ,cyberpunk-red)))) - `(nav-face-file ((,class (:foreground ,cyberpunk-fg)))) - `(nav-face-hfile ((,class (:foreground ,cyberpunk-red-4)))) - - ;; mumamo - `(mumamo-background-chunk-major ((,class (:background ,cyberpunk-black)))) - `(mumamo-background-chunk-submode1 ((,class (:background ,cyberpunk-black)))) - `(mumamo-background-chunk-submode2 ((,class (:background ,cyberpunk-bg+2)))) - `(mumamo-background-chunk-submode3 ((,class (:background ,cyberpunk-bg+3)))) - `(mumamo-background-chunk-submode4 ((,class (:background ,cyberpunk-bg+1)))) - - ;; org-mode - `(org-document-title ((,class (:foreground ,cyberpunk-blue-3 :background ,cyberpunk-black :weight bold :height 1.5)))) - `(org-document-info ((,class (:foreground ,cyberpunk-blue-3 :background ,cyberpunk-black :weight bold)))) - `(org-document-info-keyword ((,class (:foreground ,cyberpunk-gray-2 :background ,cyberpunk-black)))) - `(org-agenda-date-today - ((,class (:foreground ,cyberpunk-orange-2 :slant italic :weight bold))) t) - `(org-agenda-structure - ((,class (:inherit font-lock-comment-face)))) - `(org-archived ((,class (:slant italic)))) - `(org-checkbox ((,class (:background ,cyberpunk-gray-2 :foreground ,cyberpunk-black - :box (:line-width 1 :style released-button))))) - `(org-date ((,class (:foreground ,cyberpunk-blue-7 :underline t)))) - `(org-done ((,class (:bold t :weight bold :foreground ,cyberpunk-green - :box (:line-width 1 :style none))))) - `(org-todo ((,class (:bold t :foreground ,cyberpunk-orange :weight bold - :box (:line-width 1 :style none))))) - `(org-level-1 ((,class (:foreground ,cyberpunk-pink-1 :height 1.3)))) - `(org-level-2 ((,class (:foreground ,cyberpunk-yellow :height 1.2)))) - `(org-level-3 ((,class (:foreground ,cyberpunk-blue-5 :height 1.1)))) - `(org-level-4 ((,class (:foreground ,cyberpunk-green)))) - `(org-level-5 ((,class (:foreground ,cyberpunk-orange)))) - `(org-level-6 ((,class (:foreground ,cyberpunk-pink)))) - `(org-level-7 ((,class (:foreground ,cyberpunk-green+3)))) - `(org-level-8 ((,class (:foreground ,cyberpunk-blue-1)))) - `(org-link ((,class (:foreground ,cyberpunk-blue-6 :underline t)))) - `(org-tag ((,class (:bold t :weight bold)))) - `(org-column ((,class (:background ,cyberpunk-gray-7 :foreground ,cyberpunk-black)))) - `(org-column-title ((,class (:background ,cyberpunk-gray-7 :underline t :weight bold)))) - `(org-block ((,class (:foreground ,cyberpunk-fg :background ,cyberpunk-bg-05)))) - `(org-block-begin-line - ((,class (:foreground "#008ED1" :background ,cyberpunk-bg-1)))) - `(org-block-background ((,class (:background ,cyberpunk-bg-05)))) - `(org-block-end-line - ((,class (:foreground "#008ED1" :background ,cyberpunk-bg-1)))) - - ;; `(org-deadline-announce ((,class (:foreground ,cyberpunk-red-1)))) - ;; `(org-scheduled ((,class (:foreground ,cyberpunk-green+4)))) - ;; `(org-scheduled-previously ((,class (:foreground ,cyberpunk-red-4)))) - ;; `(org-scheduled-today ((,class (:foreground ,cyberpunk-blue+1)))) - ;; `(org-special-keyword ((,class (:foreground ,cyberpunk-yellow-1)))) - ;; `(org-table ((,class (:foreground ,cyberpunk-green+2)))) - ;; `(org-time-grid ((,class (:foreground ,cyberpunk-orange)))) - ;; `(org-upcoming-deadline ((,class (:inherit font-lock-keyword-face)))) - ;; `(org-warning ((,class (:bold t :foreground ,cyberpunk-red :weight bold :underline nil)))) - ;; `(org-formula ((,class (:foreground ,cyberpunk-yellow-2)))) - ;; `(org-headline-done ((,class (:foreground ,cyberpunk-green+3)))) - ;; `(org-hide ((,class (:foreground ,cyberpunk-bg-1)))) - - ;; outline - `(outline-8 ((,class (:inherit default)))) - `(outline-7 ((,class (:inherit outline-8 :height 1.0)))) - `(outline-6 ((,class (:inherit outline-7 :height 1.0)))) - `(outline-5 ((,class (:inherit outline-6 :height 1.0)))) - `(outline-4 ((,class (:inherit outline-5 :height 1.0)))) - `(outline-3 ((,class (:inherit outline-4 :height 1.0)))) - `(outline-2 ((,class (:inherit outline-3 :height 1.0)))) - `(outline-1 ((,class (:inherit outline-2 :height 1.0)))) - - ;; emms - `(emms-browser-year/genre-face ((,class (:foreground ,cyberpunk-blue-3 :height 1.0)))) - `(emms-browser-artist-face ((,class (:foreground ,cyberpunk-pink-1 :height 1.0)))) - `(emms-browser-composer-face ((,class (:foreground ,cyberpunk-blue-3 :height 1.0)))) - `(emms-browser-performer-face ((,class (:foreground ,cyberpunk-blue-3 :height 1.0)))) - `(emms-browser-album-face ((,class (:foreground ,cyberpunk-yellow :height 1.0)))) - `(emms-browser-track-face ((,class (:foreground ,cyberpunk-blue-5 :height 1.0)))) - - ;; Calfw - `(cfw:face-title ((,class (:foreground ,cyberpunk-pink-1 :weight bold :height 1.8)))) - `(cfw:face-header ((,class (:foreground ,cyberpunk-yellow-5 :weight bold)))) - `(cfw:face-sunday ((,class (:foreground ,cyberpunk-red :weight bold)))) - `(cfw:face-saturday ((,class (:foreground ,cyberpunk-green :weight bold)))) - `(cfw:face-holiday ((,class (:foreground ,cyberpunk-pink-2 :weight bold)))) - `(cfw:face-grid ((,class (:foreground ,cyberpunk-gray-3)))) - `(cfw:face-default-content ((,class (:foreground ,cyberpunk-cyan)))) - `(cfw:face-periods ((,class (:foreground ,cyberpunk-cyan :weight bold)))) - `(cfw:face-day-title ((,class (:foreground ,cyberpunk-fg)))) - `(cfw:face-default-day ((,class (:foreground ,cyberpunk-fg :weight bold)))) - `(cfw:face-annotation ((,class (:foreground ,cyberpunk-gray)))) - `(cfw:face-disable ((,class (:foreground ,cyberpunk-gray-2 :weight bold)))) - `(cfw:face-today-title ((,class (:foreground ,cyberpunk-blue :background ,cyberpunk-magenta)))) - `(cfw:face-today ((,class (:foreground ,cyberpunk-fg :weight bold)))) - `(cfw:face-select ((,class (:background ,cyberpunk-bg+2)))) - `(cfw:face-toolbar ((,class (:background ,cyberpunk-blue-8)))) - `(cfw:face-toolbar-button-off ((,class (:foreground ,cyberpunk-white :background ,cyberpunk-blue-8 :weight bold)))) - `(cfw:face-toolbar-button-on ((,class (:foreground ,cyberpunk-white :background ,cyberpunk-orange-1 :weight bold)))) - - ;; racket-mode - `(racket-keyword-argument-face ((t (:inherit font-lock-constant-face)))) - `(racket-selfeval-face ((t (:inherit font-lock-type-face)))) - - ;; rainbow-delimiters - `(rainbow-delimiters-depth-1-face ((,class (:foreground ,cyberpunk-red-1)))) - `(rainbow-delimiters-depth-2-face ((,class (:foreground ,cyberpunk-green-2)))) - `(rainbow-delimiters-depth-3-face ((,class (:foreground ,cyberpunk-pink-1)))) - `(rainbow-delimiters-depth-4-face ((,class (:foreground ,cyberpunk-yellow)))) - `(rainbow-delimiters-depth-5-face ((,class (:foreground ,cyberpunk-green)))) - `(rainbow-delimiters-depth-6-face ((,class (:foreground ,cyberpunk-blue-3)))) - `(rainbow-delimiters-depth-7-face ((,class (:foreground ,cyberpunk-orange)))) - `(rainbow-delimiters-depth-8-face ((,class (:foreground ,cyberpunk-blue-2)))) - `(rainbow-delimiters-depth-9-face ((,class (:foreground ,cyberpunk-gray)))) - `(rainbow-delimiters-depth-10-face ((,class (:foreground ,cyberpunk-white)))) - `(rainbow-delimiters-depth-11-face ((,class (:foreground ,cyberpunk-blue+1)))) - `(rainbow-delimiters-depth-12-face ((,class (:foreground ,cyberpunk-red-4)))) - - ;; rpm-mode - `(rpm-spec-dir-face ((,class (:foreground ,cyberpunk-green)))) - `(rpm-spec-doc-face ((,class (:foreground ,cyberpunk-green)))) - `(rpm-spec-ghost-face ((,class (:foreground ,cyberpunk-red)))) - `(rpm-spec-macro-face ((,class (:foreground ,cyberpunk-yellow)))) - `(rpm-spec-obsolete-tag-face ((,class (:foreground ,cyberpunk-red)))) - `(rpm-spec-package-face ((,class (:foreground ,cyberpunk-red)))) - `(rpm-spec-section-face ((,class (:foreground ,cyberpunk-yellow)))) - `(rpm-spec-tag-face ((,class (:foreground ,cyberpunk-blue)))) - `(rpm-spec-var-face ((,class (:foreground ,cyberpunk-red)))) - - ;; rst-mode - `(rst-level-1-face ((,class (:foreground ,cyberpunk-orange)))) - `(rst-level-2-face ((,class (:foreground ,cyberpunk-green+1)))) - `(rst-level-3-face ((,class (:foreground ,cyberpunk-blue-1)))) - `(rst-level-4-face ((,class (:foreground ,cyberpunk-yellow-2)))) - `(rst-level-5-face ((,class (:foreground ,cyberpunk-cyan)))) - `(rst-level-6-face ((,class (:foreground ,cyberpunk-green-1)))) - - ;; show-paren - `(show-paren-mismatch ((,class (:foreground ,cyberpunk-red-3 :background ,cyberpunk-black)))) - `(show-paren-match ((,class (:foreground ,cyberpunk-black :background ,cyberpunk-pink-1)))) - - `(naeu-green-face ((,class (:foreground ,cyberpunk-green :background ,cyberpunk-black)))) - `(naeu-pink-face ((,class (:foreground ,cyberpunk-pink-1 :background ,cyberpunk-black)))) - `(naeu-blue-face ((,class (:foreground ,cyberpunk-blue-1 :background ,cyberpunk-black)))) - `(naeu-orange-face ((,class (:foreground ,cyberpunk-yellow-1 :background ,cyberpunk-black)))) - `(naeu-red-face ((,class (:foreground ,cyberpunk-orange :background ,cyberpunk-black)))) - `(naeu-grey-face ((,class (:foreground ,cyberpunk-gray-7 :background ,cyberpunk-black)))) - - ;; SLIME - `(slime-repl-inputed-output-face ((,class (:foreground ,cyberpunk-red)))) - - ;;; ansi-term - `(term-color-black ((,class (:foreground ,cyberpunk-bg - :background ,cyberpunk-bg-1)))) - `(term-color-red ((,class (:foreground ,cyberpunk-red-2 - :background ,cyberpunk-red-4)))) - `(term-color-green ((,class (:foreground ,cyberpunk-green - :background ,cyberpunk-green+2)))) - `(term-color-yellow ((,class (:foreground ,cyberpunk-orange - :background ,cyberpunk-yellow)))) - `(term-color-blue ((,class (:foreground ,cyberpunk-blue-1 - :background ,cyberpunk-blue-4)))) - `(term-color-magenta ((,class (:foreground ,cyberpunk-magenta - :background ,cyberpunk-red)))) - `(term-color-cyan ((,class (:foreground ,cyberpunk-cyan - :background ,cyberpunk-blue)))) - `(term-color-white ((,class (:foreground ,cyberpunk-fg - :background ,cyberpunk-bg-1)))) - `(term-default-fg-color ((,class (:inherit term-color-white)))) - `(term-default-bg-color ((,class (:inherit term-color-black)))) - - ;; volatile-highlights - `(vhl/default-face ((,class (:background ,cyberpunk-gray-5)))) - - `(undo-tree-visualizer-active-branch-face ((,class (:foreground ,cyberpunk-pink-1 :background ,cyberpunk-black)))) - - ;; whitespace-mode - `(whitespace-space ((,class (:background ,cyberpunk-bg :foreground ,cyberpunk-bg+1)))) - `(whitespace-hspace ((,class (:background ,cyberpunk-bg :foreground ,cyberpunk-bg+1)))) - `(whitespace-tab ((,class (:background ,cyberpunk-bg :foreground ,cyberpunk-red)))) - `(whitespace-newline ((,class (:foreground ,cyberpunk-bg+1)))) - `(whitespace-trailing ((,class (:foreground ,cyberpunk-red :background ,cyberpunk-bg)))) - `(whitespace-line ((,class (:background ,cyberpunk-bg-05 :foreground ,cyberpunk-magenta)))) - `(whitespace-space-before-tab ((,class (:background ,cyberpunk-orange :foreground ,cyberpunk-orange)))) - `(whitespace-indentation ((,class (:background ,cyberpunk-yellow :foreground ,cyberpunk-red)))) - `(whitespace-empty ((,class (:background ,cyberpunk-yellow :foreground ,cyberpunk-red)))) - `(whitespace-space-after-tab ((,class (:background ,cyberpunk-yellow :foreground ,cyberpunk-red)))) - - ;; wanderlust - `(wl-highlight-folder-few-face ((,class (:foreground ,cyberpunk-red-2)))) - `(wl-highlight-folder-many-face ((,class (:foreground ,cyberpunk-red-1)))) - `(wl-highlight-folder-path-face ((,class (:foreground ,cyberpunk-orange)))) - `(wl-highlight-folder-unread-face ((,class (:foreground ,cyberpunk-blue)))) - `(wl-highlight-folder-zero-face ((,class (:foreground ,cyberpunk-fg)))) - `(wl-highlight-folder-unknown-face ((,class (:foreground ,cyberpunk-blue)))) - `(wl-highlight-message-citation-header ((,class (:foreground ,cyberpunk-red-1)))) - `(wl-highlight-message-cited-text-1 ((,class (:foreground ,cyberpunk-red)))) - `(wl-highlight-message-cited-text-2 ((,class (:foreground ,cyberpunk-green+2)))) - `(wl-highlight-message-cited-text-3 ((,class (:foreground ,cyberpunk-blue)))) - `(wl-highlight-message-cited-text-4 ((,class (:foreground ,cyberpunk-blue+1)))) - `(wl-highlight-message-header-contents-face ((,class (:foreground ,cyberpunk-green)))) - `(wl-highlight-message-headers-face ((,class (:foreground ,cyberpunk-red+1)))) - `(wl-highlight-message-important-header-contents ((,class (:foreground ,cyberpunk-green+2)))) - `(wl-highlight-message-header-contents ((,class (:foreground ,cyberpunk-green+1)))) - `(wl-highlight-message-important-header-contents2 ((,class (:foreground ,cyberpunk-green+2)))) - `(wl-highlight-message-signature ((,class (:foreground ,cyberpunk-green)))) - `(wl-highlight-message-unimportant-header-contents ((,class (:foreground ,cyberpunk-fg)))) - `(wl-highlight-summary-answered-face ((,class (:foreground ,cyberpunk-blue)))) - `(wl-highlight-summary-disposed-face ((,class (:foreground ,cyberpunk-fg - :slant italic)))) - `(wl-highlight-summary-new-face ((,class (:foreground ,cyberpunk-blue)))) - `(wl-highlight-summary-normal-face ((,class (:foreground ,cyberpunk-fg)))) - `(wl-highlight-summary-thread-top-face ((,class (:foreground ,cyberpunk-yellow)))) - `(wl-highlight-thread-indent-face ((,class (:foreground ,cyberpunk-magenta)))) - `(wl-highlight-summary-refiled-face ((,class (:foreground ,cyberpunk-fg)))) - `(wl-highlight-summary-displaying-face ((,class (:underline t :weight bold)))) - - ;; which-func-mode - `(which-func ((,class (:foreground ,cyberpunk-green+4)))) - - ;; yasnippet - `(yas/field-highlight-face ((,class (:background ,cyberpunk-pink-1 :foreground ,cyberpunk-black)))) - - ;; enh-ruby-mode enh-ruby-op-face - `(enh-ruby-op-face ((,class (:foreground ,cyberpunk-blue-7)))) - `(enh-ruby-heredoc-delimiter-face ((,class (:foreground ,cyberpunk-green+2)))) - `(enh-ruby-string-delimiter-face ((,class (:foreground ,cyberpunk-green+2)))) - `(enh-ruby-regexp-delimiter-face ((,class (:foreground ,cyberpunk-blue-1)))) - - ;; yascroll - `(yascroll:thumb-text-area ((,class (:background ,cyberpunk-bg-1)))) - `(yascroll:thumb-fringe ((,class (:background ,cyberpunk-bg-1 :foreground ,cyberpunk-bg-1)))) - - ;; customize - `(custom-button ((,class (:box (:line-width 2 :style released-button) - :background ,cyberpunk-bg-05 :foreground ,cyberpunk-fg)))) - `(custom-button-unraised ((,class (:background ,cyberpunk-bg-05 :foreground ,cyberpunk-fg)))) - ) - - ;;; custom theme variables - (custom-theme-set-variables - 'cyberpunk - `(ansi-color-names-vector [,cyberpunk-bg ,cyberpunk-red-2 ,cyberpunk-green ,cyberpunk-orange - ,cyberpunk-blue-1 ,cyberpunk-magenta ,cyberpunk-cyan ,cyberpunk-fg]) - ;; fill-column-indicator - `(fci-rule-color ,cyberpunk-bg-05))) - -;;;###autoload -(when load-file-name - (add-to-list 'custom-theme-load-path - (file-name-as-directory (file-name-directory load-file-name)))) - -(provide-theme 'cyberpunk) - -;; Local Variables: -;; no-byte-compile: t -;; indent-tabs-mode: nil -;; eval: (when (fboundp 'rainbow-mode) (rainbow-mode +1)) -;; End: - -;;; cyberpunk-theme.el ends here. diff --git a/emacs/emacs.d/themes/dracula-theme.el b/emacs/emacs.d/themes/dracula-theme.el @@ -1,458 +0,0 @@ -;;; dracula-theme.el --- Dracula Theme - -;; Copyright 2015-present, All rights reserved -;; -;; Code licensed under the MIT license - -;; Author: film42 -;; Version: 1.5.1 -;; Package-Requires: ((emacs "24")) -;; URL: https://github.com/dracula/emacs - -;;; Commentary: - -;; A dark color theme available for a number of editors. - -;;; Code: -(require 'cl-lib) -(deftheme dracula) - -(let ((colors '((fg1 "#f8f8f2") ; Assigment form: VARIABLE COLOR [TTY-COLOR] - (fg2 "#e2e2dc") - (fg3 "#ccccc7") - (fg4 "#b6b6b2") - (bg1 "#282a36" "#000000") - (bg2 "#373844") - (bg3 "#464752") - (bg4 "#565761") - (bg5 "#44475a") - (bg6 "#b45bcf") - (key2 "#0189cc") - (key3 "#ff79c6") - (builtin "#ffb86c") - (keyword "#ff79c6") - (const "#8be9fd") - (comment "#6272a4") - (func "#50fa7b") - (str "#f1fa8c") - (type "#bd93f9") - (var "#f8f8f2") - (warning "#ffb86c") - (rainbow-1 "#f8f8f2") - (rainbow-2 "#8be9fd") - (rainbow-3 "#bd93f9") - (rainbow-4 "#ff79c6") - (rainbow-5 "#ffb86c") - (rainbow-6 "#50fa7b") - (rainbow-7 "#f1fa8c") - (rainbow-8 "#0189cc") - (rainbow-9 "#ff5555") - (rainbow-10 "#a0522d") - (eph-verbatim "#f1fa8c") - (eph-code "#ff79c6"))) - (faces '(;; default - (cursor :background ,fg3) - (default :background ,bg1 :foreground ,fg1) - (default-italic :italic t) - (ffap :foreground ,fg4) - (fringe :background ,bg1 :foreground ,fg4) - (highlight :foreground ,fg3 :background ,bg3) - (hl-line :background ,bg5) - (info-quoted-name :foreground ,builtin) - (info-string :foreground ,str) - (lazy-highlight :foreground ,fg2 :background ,bg3) - (link :foreground ,const :underline t) - (linum :slant italic :foreground ,bg4 :background ,bg1) - (line-number :slant italic :foreground ,bg4 :background ,bg1) - (minibuffer-prompt :bold t :foreground ,keyword) - (region :background ,str :foreground ,bg1) - (show-paren-match-face :background ,warning) - (trailing-whitespace :foreground nil :background ,warning) - (vertical-border :foreground ,bg2) - (warning :foreground ,warning) - (whitespace-trailing :inherit trailing-whitespace) - (header-line :background ,bg1) - ;; syntax - (font-lock-builtin-face :foreground ,builtin) - (font-lock-comment-face :foreground ,comment) - (font-lock-constant-face :foreground ,const) - (font-lock-doc-face :foreground ,comment) - (font-lock-function-name-face :foreground ,func :bold t) - (font-lock-keyword-face :bold t :foreground ,keyword) - (font-lock-negation-char-face :foreground ,const) - (font-lock-reference-face :foreground ,const) - (font-lock-string-face :foreground ,str) - (font-lock-type-face :foreground ,type ) - (font-lock-variable-name-face :foreground ,var) - (font-lock-warning-face :foreground ,warning :background ,bg2) - ;; auto-complete - (ac-completion-face :underline t :foreground ,keyword) - ;; company - (company-echo-common :foreground ,bg1 :background ,fg1) - (company-preview :background ,bg1 :foreground ,key2) - (company-preview-common :foreground ,bg2 :foreground ,fg3) - (company-preview-search :foreground ,type :background ,bg1) - (company-scrollbar-bg :background ,bg3) - (company-scrollbar-fg :foreground ,keyword) - (company-template-field :inherit region) - (company-tooltip :foreground ,fg2 :background ,bg1 :bold t) - (company-tooltip-annotation :foreground ,const) - (company-tooltip-common :foreground ,fg3) - (company-tooltip-common-selection :foreground ,str) - (company-tooltip-mouse :inherit highlight) - (company-tooltip-selection :background ,bg3 :foreground ,fg3) - ;; diff-hl - (diff-hl-change :foreground ,rainbow-5 :background ,rainbow-5) - (diff-hl-delete :foreground ,rainbow-9 :background ,rainbow-9) - (diff-hl-insert :foreground ,rainbow-6 :background ,rainbow-6) - ;; enh-ruby - (enh-ruby-heredoc-delimiter-face :foreground ,str) - (enh-ruby-op-face :foreground ,keyword) - (enh-ruby-regexp-delimiter-face :foreground ,str) - (enh-ruby-string-delimiter-face :foreground ,str) - ;; font-latex - (font-latex-bold-face :foreground ,type) - (font-latex-italic-face :foreground ,key3 :italic t) - (font-latex-match-reference-keywords :foreground ,const) - (font-latex-match-variable-keywords :foreground ,var) - (font-latex-string-face :foreground ,str) - ;; gnus-group - (gnus-group-mail-1 :foreground ,keyword :bold t) - (gnus-group-mail-1-empty :inherit gnus-group-mail-1 :bold nil) - (gnus-group-mail-2 :foreground ,const :bold t) - (gnus-group-mail-2-empty :inherit gnus-group-mail-2 :bold nil) - (gnus-group-mail-3 :foreground ,comment :bold t) - (gnus-group-mail-3-empty :inherit gnus-group-mail-3 :bold nil) - (gnus-group-mail-low :foreground ,bg5 :bold t) - (gnus-group-mail-low-empty :inherit gnus-group-mail-low :bold nil) - (gnus-group-news-1 :foreground ,keyword :bold t) - (gnus-group-news-1-empty :inherit gnus-group-news-1 :bold nil) - (gnus-group-news-2 :foreground ,const :bold t) - (gnus-group-news-2-empty :inherit gnus-group-news-2 :bold nil) - (gnus-group-news-3 :foreground ,comment :bold t) - (gnus-group-news-3-empty :inherit gnus-group-news-3 :bold nil) - (gnus-group-news-4 :inherit gnus-group-news-low) - (gnus-group-news-4-empty :inherit gnus-group-news-low-empty) - (gnus-group-news-5 :inherit gnus-group-news-low) - (gnus-group-news-5-empty :inherit gnus-group-news-low-empty) - (gnus-group-news-6 :inherit gnus-group-news-low) - (gnus-group-news-6-empty :inherit gnus-group-news-low-empty) - (gnus-group-news-low :foreground ,bg5 :bold t) - (gnus-group-news-low-empty :inherit gnus-group-news-low :bold nil) - (gnus-header-content :foreground ,keyword) - (gnus-header-from :foreground ,var) - (gnus-header-name :foreground ,type) - (gnus-header-subject :foreground ,func :bold t) - (gnus-summary-markup-face :foreground ,const) - (gnus-summary-high-unread :foreground ,keyword :weight bold) - (gnus-summary-high-read :inherit gnus-summary-high-unread :weight normal) - (gnus-summary-high-ancient :inherit gnus-summary-high-read) - (gnus-summary-high-ticked :inherit gnus-summary-high-read :underline t) - (gnus-summary-normal-unread :foreground ,key2 :weight bold) - (gnus-summary-normal-read :inherit gnus-summary-normal-unread :weight normal) - (gnus-summary-normal-ancient :inherit gnus-summary-normal-read) - (gnus-summary-normal-ticked :inherit gnus-summary-normal-read :underline t) - (gnus-summary-low-unread :foreground ,comment :weight bold) - (gnus-summary-low-read :inherit gnus-summary-low-unread :weight normal) - (gnus-summary-low-ancient :inherit gnus-summary-low-read) - (gnus-summary-low-ticked :inherit gnus-summary-low-read :underline t) - (gnus-summary-selected :inverse-video t) - ;; helm - (helm-bookmark-w3m :foreground ,type) - (helm-buffer-not-saved :foreground ,type :background ,bg1) - (helm-buffer-process :foreground ,builtin :background ,bg1) - (helm-buffer-saved-out :foreground ,fg1 :background ,bg1) - (helm-buffer-size :foreground ,fg1 :background ,bg1) - (helm-candidate-number :foreground ,bg1 :background ,fg1) - (helm-ff-directory :foreground ,func :background ,bg1 :weight bold) - (helm-ff-executable :foreground ,key2 :background ,bg1 :weight normal) - (helm-ff-file :foreground ,fg1 :background ,bg1 :weight normal) - (helm-ff-invalid-symlink :foreground ,key3 :background ,bg1 :weight bold) - (helm-ff-prefix :foreground ,bg1 :background ,keyword :weight normal) - (helm-ff-symlink :foreground ,keyword :background ,bg1 :weight bold) - (helm-grep-cmd-line :foreground ,fg1 :background ,bg1) - (helm-grep-file :foreground ,fg1 :background ,bg1) - (helm-grep-finish :foreground ,fg2 :background ,bg1) - (helm-grep-lineno :foreground ,fg1 :background ,bg1) - (helm-grep-match :foreground nil :background nil :inherit helm-match) - (helm-grep-running :foreground ,func :background ,bg1) - (helm-header :foreground ,fg2 :background ,bg1 :underline nil :box nil) - (helm-moccur-buffer :foreground ,func :background ,bg1) - (helm-selection :background ,bg2 :underline nil) - (helm-selection-line :background ,bg2) - (helm-separator :foreground ,type :background ,bg1) - (helm-source-go-package-godoc-description :foreground ,str) - (helm-source-header :foreground ,keyword :background ,bg1 :underline nil :weight bold) - (helm-time-zone-current :foreground ,builtin :background ,bg1) - (helm-time-zone-home :foreground ,type :background ,bg1) - (helm-visible-mark :foreground ,bg1 :background ,bg3) - ;; highlight-indentation minor mode - (highlight-indentation-face :background ,bg2) - ;; icomplete - (icompletep-determined :foreground ,builtin) - ;; ido - (ido-first-match :foreground ,keyword :bold t) - (ido-only-match :foreground ,warning) - (ido-subdir :foreground ,builtin) - ;; isearch - (isearch :bold t :foreground ,warning :background ,bg3) - (isearch-fail :foreground ,bg1 :background ,warning) - ;; jde-java - (jde-java-font-lock-constant-face :foreground ,const) - (jde-java-font-lock-modifier-face :foreground ,key3) - (jde-java-font-lock-number-face :foreground ,var) - (jde-java-font-lock-package-face :foreground ,var) - (jde-java-font-lock-private-face :foreground ,keyword) - (jde-java-font-lock-public-face :foreground ,keyword) - ;; js2-mode - (js2-external-variable :foreground ,type ) - (js2-function-param :foreground ,const) - (js2-jsdoc-html-tag-delimiter :foreground ,str) - (js2-jsdoc-html-tag-name :foreground ,key2) - (js2-jsdoc-value :foreground ,str) - (js2-private-function-call :foreground ,const) - (js2-private-member :foreground ,fg3) - ;; js3-mode - (js3-error-face :underline ,warning) - (js3-external-variable-face :foreground ,var) - (js3-function-param-face :foreground ,key3) - (js3-instance-member-face :foreground ,const) - (js3-jsdoc-tag-face :foreground ,keyword) - (js3-warning-face :underline ,keyword) - ;; magit - (magit-branch :foreground ,const :weight bold) - (magit-diff-context-highlight :background ,bg3 :foreground ,fg3) - (magit-diff-file-header :foreground ,fg2 :background ,bg3) - (magit-diffstat-added :foreground ,type) - (magit-diffstat-removed :foreground ,var) - (magit-hash :foreground ,fg2) - (magit-hunk-heading :background ,bg3) - (magit-hunk-heading-highlight :background ,bg3) - (magit-item-highlight :background ,bg3) - (magit-log-author :foreground ,fg3) - (magit-process-ng :foreground ,warning :weight bold) - (magit-process-ok :foreground ,func :weight bold) - (magit-section-heading :foreground ,keyword :weight bold) - (magit-section-highlight :background ,bg2) - ;; mode-line - (mode-line :foreground nil :background ,bg5 :box ,bg5) - (mode-line-inactive :foreground ,fg1 :background ,bg2 :box ,bg2) - ;; mu4e - (mu4e-cited-1-face :foreground ,fg2) - (mu4e-cited-7-face :foreground ,fg3) - (mu4e-header-marks-face :foreground ,type) - (mu4e-view-url-number-face :foreground ,type) - ;; org - (org-agenda-date :foreground ,rainbow-2 :underline nil) - (org-agenda-dimmed-todo-face :foreground ,comment) - (org-agenda-done :foreground ,rainbow-6) - (org-agenda-structure :foreground ,rainbow-3) - (org-block :foreground ,rainbow-5) - (org-code :foreground ,rainbow-7) - (org-column :background ,bg4) - (org-column-title :inherit org-column :weight bold :underline t) - (org-date :foreground ,rainbow-2 :underline t) - (org-document-info :foreground ,rainbow-8) - (org-document-info-keyword :foreground ,comment) - (org-document-title :weight bold :foreground ,rainbow-5 :height 1.44) - (org-done :foreground ,rainbow-6) - (org-ellipsis :foreground ,comment) - (org-footnote :foreground ,rainbow-8) - (org-formula :foreground ,rainbow-4) - (org-headline-done :foreground ,comment :bold nil :strike-through t) - (org-hide :foreground ,bg1 :background ,bg1) - (org-level-1 :inherit bold :foreground ,rainbow-4 :height 1.3) - (org-level-2 :inherit bold :foreground ,rainbow-3 :height 1.1) - (org-level-3 :bold nil :foreground ,rainbow-6 :height 1.0) - (org-level-4 :bold nil :foreground ,rainbow-7) - (org-level-5 :bold nil :foreground ,rainbow-2) - (org-level-6 :bold nil :foreground ,rainbow-5) - (org-level-7 :bold nil :foreground ,rainbow-8) - (org-level-8 :bold nil :foreground ,rainbow-1) - (org-link :foreground ,rainbow-2 :underline t) - (org-priority :foreground ,rainbow-2) - (org-scheduled :foreground ,rainbow-6) - (org-scheduled-previously :foreground ,rainbow-7) - (org-scheduled-today :foreground ,rainbow-6) - (org-sexp-date :foreground ,fg4) - (org-special-keyword :foreground ,rainbow-7) - (org-table :foreground ,rainbow-3) - (org-tag :foreground ,rainbow-4 :bold t :background ,bg2) - (org-todo :foreground ,rainbow-5 :bold t :background ,bg2) - (org-upcoming-deadline :foreground ,rainbow-7) - (org-warning :weight bold :foreground ,rainbow-4) - ;; outline - (outline-1 :foreground ,rainbow-6) - (outline-2 :foreground ,rainbow-3) - (outline-3 :foreground ,rainbow-2) - (outline-4 :foreground ,rainbow-5) - (outline-5 :foreground ,rainbow-5) - (outline-6 :foreground ,rainbow-8) - ;; powerline - (powerline-evil-base-face :foreground ,bg2) - (powerline-evil-emacs-face :inherit powerline-evil-base-face :background ,rainbow-7) - (powerline-evil-insert-face :inherit powerline-evil-base-face :background ,rainbow-2) - (powerline-evil-motion-face :inherit powerline-evil-base-face :background ,rainbow-3) - (powerline-evil-normal-face :inherit powerline-evil-base-face :background ,rainbow-6) - (powerline-evil-operator-face :inherit powerline-evil-base-face :background ,rainbow-4) - (powerline-evil-replace-face :inherit powerline-evil-base-face :background ,rainbow-9) - (powerline-evil-visual-face :inherit powerline-evil-base-face :background ,rainbow-5) - (powerline-active1 :background ,bg6 :foreground ,fg1) - (powerline-active2 :background ,bg6 :foreground ,fg1) - (powerline-inactive2 :background ,bg3 :foreground ,fg1) - (powerline-inactive2 :background ,bg3 :foreground ,fg1) - ;; rainbow-delimiters - (rainbow-delimiters-depth-1-face :foreground ,rainbow-1) - (rainbow-delimiters-depth-2-face :foreground ,rainbow-2) - (rainbow-delimiters-depth-3-face :foreground ,rainbow-3) - (rainbow-delimiters-depth-4-face :foreground ,rainbow-4) - (rainbow-delimiters-depth-5-face :foreground ,rainbow-5) - (rainbow-delimiters-depth-6-face :foreground ,rainbow-6) - (rainbow-delimiters-depth-7-face :foreground ,rainbow-7) - (rainbow-delimiters-depth-8-face :foreground ,rainbow-8) - (rainbow-delimiters-unmatched-face :foreground ,warning) - ;; rpm-spec - (rpm-spec-dir-face :foreground ,rainbow-6) - (rpm-spec-doc-face :foreground ,rainbow-4) - (rpm-spec-ghost-face :foreground ,rainbow-3) - (rpm-spec-macro-face :foreground ,rainbow-7) - (rpm-spec-obsolete-tag-face :inherit font-lock-warning-face) - (rpm-spec-package-face :foreground ,rainbow-3) - (rpm-spec-section-face :foreground ,rainbow-7) - (rpm-spec-tag-face :foreground ,rainbow-2) - (rpm-spec-var-face :foreground ,rainbow-10) - ;; slime - (slime-repl-inputed-output-face :foreground ,type) - ;; spam - (spam :inherit gnus-summary-normal-read :foreground ,warning :strike-through t :slant oblique) - ;; term - (term :foreground ,fg1 :background ,bg1) - (term-color-black :foreground ,bg3 :background ,bg3) - (term-color-blue :foreground ,type :background ,type) - (term-color-cyan :foreground ,const :background ,const) - (term-color-green :foreground ,func :background ,func) - (term-color-magenta :foreground ,keyword :background ,keyword) - (term-color-red :foreground ,rainbow-9 :background ,rainbow-9) - (term-color-white :foreground ,fg2 :background ,fg2) - (term-color-yellow :foreground ,str :background ,str) - ;; undo-tree - (undo-tree-visualizer-current-face :foreground ,builtin) - (undo-tree-visualizer-default-face :foreground ,fg2) - (undo-tree-visualizer-register-face :foreground ,type) - (undo-tree-visualizer-unmodified-face :foreground ,var) - ;; web-mode - (web-mode-builtin-face :inherit ,font-lock-builtin-face) - (web-mode-comment-face :inherit ,font-lock-comment-face) - (web-mode-constant-face :inherit ,font-lock-constant-face) - (web-mode-doctype-face :inherit ,font-lock-comment-face) - (web-mode-function-name-face :inherit ,font-lock-function-name-face) - (web-mode-html-attr-name-face :foreground ,type) - (web-mode-html-attr-value-face :foreground ,func) - (web-mode-html-tag-face :foreground ,keyword :bold t) - (web-mode-keyword-face :foreground ,keyword) - (web-mode-string-face :foreground ,str) - (web-mode-type-face :inherit ,font-lock-type-face) - (web-mode-warning-face :inherit ,font-lock-warning-face) - ;; which-func - (which-func :inherit ,font-lock-function-name-face) - (dired-directory :foreground ,func :weight normal) - (dired-flagged :foreground ,keyword) - (dired-header :foreground ,fg3 :background ,bg1) - (dired-ignored :inherit shadow) - (dired-mark :foreground ,var :weight bold) - (dired-marked :foreground ,builtin :weight bold) - (dired-perm-write :foreground ,fg3 :underline t) - (dired-symlink :foreground ,str :weight normal :slant italic) - (dired-warning :foreground ,warning :underline t) - (diredp-compressed-file-name :foreground ,fg3) - (diredp-compressed-file-suffix :foreground ,fg4) - (diredp-date-time :foreground ,var) - (diredp-deletion-file-name :foreground ,keyword :background ,bg5) - (diredp-deletion :foreground ,keyword :weight bold) - (diredp-dir-heading :foreground ,fg2 :background ,bg4) - (diredp-dir-name :inherit dired-directory) - (diredp-dir-priv :inherit dired-directory) - (diredp-executable-tag :foreground ,builtin) - (diredp-file-name :foreground ,fg1) - (diredp-file-suffix :foreground ,fg4) - (diredp-flag-mark-line :foreground ,fg2 :slant italic :background ,bg5) - (diredp-flag-mark :foreground ,fg2 :weight bold :background ,bg5) - (diredp-ignored-file-name :foreground ,fg1) - (diredp-mode-line-flagged :foreground ,warning) - (diredp-mode-line-marked :foreground ,warning) - (diredp-no-priv :foreground ,fg1) - (diredp-number :foreground ,const) - (diredp-other-priv :foreground ,builtin) - (diredp-rare-priv :foreground ,builtin) - (diredp-read-priv :foreground ,type) - (diredp-write-priv :foreground ,keyword) - (diredp-exec-priv :foreground ,str) - (diredp-symlink :foreground ,warning) - (diredp-link-priv :foreground ,warning) - (diredp-autofile-name :foreground ,str) - (diredp-tagged-autofile-name :foreground ,str) - (icicle-whitespace-highlight :background ,var) - (icicle-special-candidate :foreground ,fg2) - (icicle-extra-candidate :foreground ,fg2) - (icicle-search-main-regexp-others :foreground ,var) - (icicle-search-current-input :foreground ,keyword) - (icicle-search-context-level-8 :foreground ,warning) - (icicle-search-context-level-7 :foreground ,warning) - (icicle-search-context-level-6 :foreground ,warning) - (icicle-search-context-level-5 :foreground ,warning) - (icicle-search-context-level-4 :foreground ,warning) - (icicle-search-context-level-3 :foreground ,warning) - (icicle-search-context-level-2 :foreground ,warning) - (icicle-search-context-level-1 :foreground ,warning) - (icicle-search-main-regexp-current :foreground ,fg1) - (icicle-saved-candidate :foreground ,fg1) - (icicle-proxy-candidate :foreground ,fg1) - (icicle-mustmatch-completion :foreground ,type) - (icicle-multi-command-completion :foreground ,fg2 :background ,bg2) - (icicle-msg-emphasis :foreground ,func) - (icicle-mode-line-help :foreground ,fg4) - (icicle-match-highlight-minibuffer :foreground ,builtin) - (icicle-match-highlight-Completions :foreground ,func) - (icicle-key-complete-menu-local :foreground ,fg1) - (icicle-key-complete-menu :foreground ,fg1) - (icicle-input-completion-fail-lax :foreground ,keyword) - (icicle-input-completion-fail :foreground ,keyword) - (icicle-historical-candidate-other :foreground ,fg1) - (icicle-historical-candidate :foreground ,fg1) - (icicle-current-candidate-highlight :foreground ,warning :background ,bg3) - (icicle-Completions-instruction-2 :foreground ,fg4) - (icicle-Completions-instruction-1 :foreground ,fg4) - (icicle-completion :foreground ,var) - (icicle-complete-input :foreground ,builtin) - (icicle-common-match-highlight-Completions :foreground ,type) - (icicle-candidate-part :foreground ,var) - (icicle-annotation :foreground ,fg4)))) - - (apply #'custom-theme-set-faces - 'dracula - (let ((color-names (mapcar #'car colors)) - (graphic-colors (mapcar #'cadr colors)) - (tty-colors (mapcar #'car (mapcar #'last colors)))) - (cl-flet* ((expand-for-tty (spec) (cl-progv color-names tty-colors - (eval `(backquote ,spec)))) - (expand-for-graphic (spec) (cl-progv color-names graphic-colors - (eval `(backquote ,spec))))) - (cl-loop for (face . spec) in faces - collect `(,face - ((((min-colors 16777216)) - ,(expand-for-graphic spec)) - (t - ,(expand-for-tty spec))))))))) - -;;;###autoload -(when load-file-name - (add-to-list 'custom-theme-load-path - (file-name-as-directory (file-name-directory load-file-name)))) - -(provide-theme 'dracula) - -;; Local Variables: -;; no-byte-compile: t -;; End: - -;;; dracula-theme.el ends here