API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Nov 20th, 2018
413
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lisp 26.89 KB | None | 0 0
raw download clone embed print report
  1. ;; Base16 PaperColor (https://github.com/chriskempson/base16)
  2. ;; Scheme: Nguyen Nguyen (http://github.com/NLKNguyen)
  3.  
  4. ;;; base16-papercolor-dark-theme.el
  5.  
  6. ;;; Code:
  7.  
  8. (deftheme base16-papercolor-dark)
  9.  
  10. (let ((base00 "#222222")
  11.       (base01 "#262626")
  12.       (base01a "#2c2c2c")
  13.       (base01b "#353535")
  14.       (base02 "#4d4d4c")
  15.       (base02b "#5d5d5d")
  16.       (base03 "#808080")
  17.       (base04 "#949494")
  18.       (base05 "#d0d0d0")
  19.       (base06 "#f3f3f3")
  20.       (base07 "#f3f3f3")
  21.       (base08 "#af87af")
  22.       (base09 "#ff5faf")
  23.       (base09b "#ff6c6b")
  24.       (base0A "#00afaf")
  25.       (base0B "#dfaf5f")
  26.       (base0C "#5fafdf")
  27.       (base0D "#df875f")
  28.       (base0E "#afdf00")
  29.       (base0F "#00af5f"))
  30.  
  31.   (unless (display-graphic-p)
  32.     (setq base00 "black"
  33.           base01 "color-18"
  34.           base02 "color-19"
  35.           base03 "brightblack"
  36.           base04 "color-20"
  37.           base05 "white"
  38.           base06 "color-21"
  39.           base07 "brightwhite"
  40.           base08 "red"
  41.           base09 "color-16"
  42.           base0A "yellow"
  43.           base0B "green"
  44.           base0C "cyan"
  45.           base0D "blue"
  46.           base0E "magenta"
  47.           base0F "color-17"))
  48.  
  49.   (custom-theme-set-faces
  50.    'base16-papercolor-dark
  51.  
  52.    ;; Built-in stuff (Emacs 23)
  53.    `(border ((t (:background ,base03))))
  54.    `(border-glyph ((t (nil))))
  55.    `(cursor ((t (:background ,base08))))
  56.    `(default ((t (:background ,base00 :foreground ,base05))))
  57.    `(fringe ((t (:background ,base01b))))
  58.    `(gui-element ((t (:background ,base03 :foreground ,base06))))
  59.    `(highlight ((t (:background ,base01))))
  60.    `(link ((t (:foreground ,base0D))))
  61.    `(link-visited ((t (:foreground ,base0E))))
  62.    `(minibuffer-prompt ((t (:foreground ,base0D))))
  63.    `(mode-line ((t (:background ,base02b :foreground ,base05 :box (:line-width 2 :color ,base02b)))))
  64.    `(mode-line-buffer-id ((t (:foreground ,base0E :background nil :weight bold))))
  65.    `(mode-line-emphasis ((t (:foreground ,base06 :slant italic))))
  66.    `(mode-line-highlight ((t (:foreground ,base0E :box nil :weight bold))))
  67.    `(mode-line-inactive ((t (:background ,base01b :foreground ,base03 :box (:line-width 2 :color ,base01b)))))
  68.    `(region ((t (:background ,base02))))
  69.    `(secondary-selection ((t (:background ,base02))))
  70.    `(error ((t (:foreground ,base08 :weight bold))))
  71.    `(warning ((t (:foreground ,base09 :weight bold))))
  72.    `(success ((t (:foreground ,base0B :weight bold))))
  73.  
  74.    `(hl-line ((t (:background ,base01a))))
  75.  
  76.    `(header-line ((t (:inherit mode-line :foreground ,base0E :background nil))))
  77.  
  78.    ;; Font-lock stuff
  79.    `(font-lock-builtin-face ((t (:foreground ,base0C))))
  80.    `(font-lock-comment-delimiter-face ((t (:foreground ,base02))))
  81.    `(font-lock-comment-face ((t (:foreground ,base03))))
  82.    `(font-lock-constant-face ((t (:foreground ,base09))))
  83.    `(font-lock-doc-face ((t (:foreground ,base04))))
  84.    `(font-lock-doc-string-face ((t (:foreground ,base03))))
  85.    `(font-lock-function-name-face ((t (:foreground ,base0D))))
  86.    `(font-lock-keyword-face ((t (:foreground ,base0E))))
  87.    `(font-lock-negation-char-face ((t (:foreground ,base0B))))
  88.    `(font-lock-preprocessor-face ((t (:foreground ,base0D))))
  89.    `(font-lock-regexp-grouping-backslash ((t (:foreground ,base0A))))
  90.    `(font-lock-regexp-grouping-construct ((t (:foreground ,base0E))))
  91.    `(font-lock-string-face ((t (:foreground ,base0B))))
  92.    `(font-lock-type-face ((t (:foreground ,base0A))))
  93.    `(font-lock-variable-name-face ((t (:foreground ,base0C))))
  94.    `(font-lock-warning-face ((t (:foreground ,base08))))
  95.  
  96.    ;; persp
  97.    `(persp-selected-face ((t (:foreground ,base0C :weight bold))))
  98.  
  99.    ;; linum-mode
  100.    `(linum ((t (:background ,base01 :foreground ,base03))))
  101.  
  102.    ;; Search
  103.    `(match ((t (:foreground ,base0D :background ,base01 :inverse-video t))))
  104.    `(isearch ((t (:foreground ,base0A :background ,base01 :inverse-video t))))
  105.    `(isearch-lazy-highlight-face ((t (:foreground ,base0C :background ,base01 :inverse-video t))))
  106.    `(isearch-fail ((t (:background ,base01 :inherit font-lock-warning-face :inverse-video t))))
  107.    `(evil-search-highlight-persist-highlight-face ((t (:background ,base01 :inherit font-lock-warning-face :inverse-video t))))
  108.  
  109.    ;; Popups
  110.    `(popup-face ((t (:foreground ,base05 :background ,base02))))
  111.    `(popup-isearch-match ((t (:foreground ,base00 :background ,base0B))))
  112.    `(popup-scroll-bar-background-face ((t (:background ,base03))))
  113.    `(popup-scroll-bar-foreground-face ((t (:background ,base05))))
  114.    `(popup-summary-face ((t (:foreground ,base04))))
  115.    `(popup-tip-face ((t (:foreground ,base00 :background ,base0A))))
  116.    `(popup-menu-mouse-face ((t (:foreground ,base00 :background ,base0D))))
  117.    `(popup-menu-selection-face ((t (:foreground ,base00 :background ,base0C))))
  118.  
  119.    ;; Flymake
  120.    `(flymake-warnline ((t (:underline ,base09 :background ,base01))))
  121.    `(flymake-errline ((t (:underline ,base08 :background ,base01))))
  122.  
  123.    ;; Flycheck
  124.    `(flycheck-warning ((t (:underline (:color ,base0B :style wave)))))
  125.    `(flycheck-fringe-warning ((t (:foreground ,base0B))))
  126.    `(flycheck-error ((t (:underline (:color ,base09b :style wave)))))
  127.    `(flycheck-fringe-error ((t (:foreground ,base09b))))
  128.    `(flycheck-info ((t (:underline (:color ,base0C :style wave)))))
  129.    `(flycheck-fringe-info ((t (:foreground ,base0C))))
  130.  
  131.    ;; Clojure errors
  132.    `(clojure-test-failure-face ((t (:background nil :inherit flymake-warnline))))
  133.    `(clojure-test-error-face ((t (:background nil :inherit flymake-errline))))
  134.    `(clojure-test-success-face ((t (:background nil :foreground nil :underline ,base0B))))
  135.  
  136.    ;; For Brian Carper's extended clojure syntax table
  137.    `(clojure-keyword ((t (:foreground ,base0A))))
  138.    `(clojure-parens ((t (:foreground ,base06))))
  139.    `(clojure-braces ((t (:foreground ,base0B))))
  140.    `(clojure-brackets ((t (:foreground ,base0A))))
  141.    `(clojure-double-quote ((t (:foreground ,base0C :background nil))))
  142.    `(clojure-special ((t (:foreground ,base0D))))
  143.    `(clojure-java-call ((t (:foreground ,base0E))))
  144.  
  145.    ;; MMM-mode
  146.    `(mmm-code-submode-face ((t (:background ,base03))))
  147.    `(mmm-comment-submode-face ((t (:inherit font-lock-comment-face))))
  148.    `(mmm-output-submode-face ((t (:background ,base03))))
  149.  
  150.    ;; rainbow-delimiters
  151.    `(rainbow-delimiters-depth-1-face ((t (:foreground ,base0E))))
  152.    `(rainbow-delimiters-depth-2-face ((t (:foreground ,base0D))))
  153.    `(rainbow-delimiters-depth-3-face ((t (:foreground ,base0C))))
  154.    `(rainbow-delimiters-depth-4-face ((t (:foreground ,base0B))))
  155.    `(rainbow-delimiters-depth-5-face ((t (:foreground ,base0A))))
  156.    `(rainbow-delimiters-depth-6-face ((t (:foreground ,base09))))
  157.    `(rainbow-delimiters-depth-7-face ((t (:foreground ,base08))))
  158.    `(rainbow-delimiters-depth-8-face ((t (:foreground ,base03))))
  159.    `(rainbow-delimiters-depth-9-face ((t (:foreground ,base05))))
  160.  
  161.    ;; IDO
  162.    `(ido-subdir ((t (:foreground ,base04))))
  163.    `(ido-first-match ((t (:foreground ,base09 :weight bold))))
  164.    `(ido-only-match ((t (:foreground ,base08 :weight bold))))
  165.    `(ido-indicator ((t (:foreground ,base08 :background ,base01))))
  166.    `(ido-virtual ((t (:foreground ,base04))))
  167.  
  168.    ;; which-function
  169.    `(which-func ((t (:foreground ,base0D :background nil :weight bold))))
  170.  
  171.    `(trailing-whitespace ((t (:background ,base0C :foreground ,base0A))))
  172.    `(whitespace-empty ((t (:foreground ,base08 :background ,base0A))))
  173.    `(whitespace-hspace ((t (:background ,base04 :foreground ,base04))))
  174.    `(whitespace-indentation ((t (:background ,base0A :foreground ,base08))))
  175.    `(whitespace-line ((t (:background ,base01 :foreground ,base0F))))
  176.    `(whitespace-newline ((t (:foreground ,base04))))
  177.    `(whitespace-space ((t (:background ,base01 :foreground ,base04))))
  178.    `(whitespace-space-after-tab ((t (:background ,base0A :foreground ,base08))))
  179.    `(whitespace-space-before-tab ((t (:background ,base09 :foreground ,base08))))
  180.    `(whitespace-tab ((t (:background ,base04 :foreground ,base04))))
  181.    `(whitespace-trailing ((t (:background ,base08 :foreground ,base0A))))
  182.  
  183.    ;; Parenthesis matching (built-in)
  184.    `(show-paren-match ((t (:background ,base02 :foreground ,base09 :weight bold))))
  185.    `(show-paren-mismatch ((t (:background ,base09 :foreground ,base03))))
  186.  
  187.    ;; Parenthesis matching (mic-paren)
  188.    `(paren-face-match ((t (:foreground nil :background nil :inherit show-paren-match))))
  189.    `(paren-face-mismatch ((t (:foreground nil :background nil :inherit show-paren-mismatch))))
  190.    `(paren-face-no-match ((t (:foreground nil :background nil :inherit show-paren-mismatch))))
  191.  
  192.    ;; Parenthesis dimming (parenface)
  193.    `(paren-face ((t (:foreground ,base04 :background nil))))
  194.  
  195.    `(sh-heredoc ((t (:foreground nil :inherit font-lock-string-face :weight normal))))
  196.    `(sh-quoted-exec ((t (:foreground nil :inherit font-lock-preprocessor-face))))
  197.    `(slime-highlight-edits-face ((t (:weight bold))))
  198.    `(slime-repl-input-face ((t (:weight normal :underline nil))))
  199.    `(slime-repl-prompt-face ((t (:underline nil :weight bold :foreground ,base0E))))
  200.    `(slime-repl-result-face ((t (:foreground ,base0B))))
  201.    `(slime-repl-output-face ((t (:foreground ,base0D :background ,base01))))
  202.  
  203.    `(csv-separator-face ((t (:foreground ,base09))))
  204.  
  205.    `(diff-added ((t (:foreground ,base0B))))
  206.    `(diff-changed ((t (:foreground ,base0A))))
  207.    `(diff-removed ((t (:foreground ,base08))))
  208.    `(diff-header ((t (:background ,base01))))
  209.    `(diff-file-header ((t (:background ,base02))))
  210.    `(diff-hunk-header ((t (:background ,base01 :foreground ,base0E))))
  211.  
  212.    `(diff-hl-change ((t (:foreground ,base0C))))
  213.    `(diff-hl-delete ((t (:foreground ,base09b))))
  214.    `(diff-hl-insert ((t (:foreground ,base0E))))
  215.  
  216.    `(ediff-even-diff-A ((t (:foreground nil :background nil :inverse-video t))))
  217.    `(ediff-even-diff-B ((t (:foreground nil :background nil :inverse-video t))))
  218.    `(ediff-odd-diff-A  ((t (:foreground ,base04 :background nil :inverse-video t))))
  219.    `(ediff-odd-diff-B  ((t (:foreground ,base04 :background nil :inverse-video t))))
  220.  
  221.    `(eldoc-highlight-function-argument ((t (:foreground ,base0B :weight bold))))
  222.  
  223.    ;; undo-tree
  224.    `(undo-tree-visualizer-default-face ((t (:foreground ,base06))))
  225.    `(undo-tree-visualizer-current-face ((t (:foreground ,base0B :weight bold))))
  226.    `(undo-tree-visualizer-active-branch-face ((t (:foreground ,base08))))
  227.    `(undo-tree-visualizer-register-face ((t (:foreground ,base0A))))
  228.  
  229.    ;; auctex
  230.    `(font-latex-bold-face ((t (:foreground ,base0B))))
  231.    `(font-latex-doctex-documentation-face ((t (:background ,base03))))
  232.    `(font-latex-italic-face ((t (:foreground ,base0B))))
  233.    `(font-latex-math-face ((t (:foreground ,base09))))
  234.    `(font-latex-sectioning-0-face ((t (:foreground ,base0A))))
  235.    `(font-latex-sectioning-1-face ((t (:foreground ,base0A))))
  236.    `(font-latex-sectioning-2-face ((t (:foreground ,base0A))))
  237.    `(font-latex-sectioning-3-face ((t (:foreground ,base0A))))
  238.    `(font-latex-sectioning-4-face ((t (:foreground ,base0A))))
  239.    `(font-latex-sectioning-5-face ((t (:foreground ,base0A))))
  240.    `(font-latex-sedate-face ((t (:foreground ,base0C))))
  241.    `(font-latex-string-face ((t (:foreground ,base0A))))
  242.    `(font-latex-verbatim-face ((t (:foreground ,base09))))
  243.    `(font-latex-warning-face ((t (:foreground ,base08))))
  244.  
  245.    ;; dired+
  246.    `(diredp-compressed-file-suffix ((t (:foreground ,base0D))))
  247.    `(diredp-dir-heading ((t (:foreground nil :background nil :inherit heading))))
  248.    `(diredp-dir-priv ((t (:foreground ,base0C :background nil))))
  249.    `(diredp-exec-priv ((t (:foreground ,base0D :background nil))))
  250.    `(diredp-executable-tag ((t (:foreground ,base08 :background nil))))
  251.    `(diredp-file-name ((t (:foreground ,base0A))))
  252.    `(diredp-file-suffix ((t (:foreground ,base0B))))
  253.    `(diredp-flag-mark-line ((t (:background nil :inherit highlight))))
  254.    `(diredp-ignored-file-name ((t (:foreground ,base04))))
  255.    `(diredp-link-priv ((t (:background nil :foreground ,base0E))))
  256.    `(diredp-mode-line-flagged ((t (:foreground ,base08))))
  257.    `(diredp-mode-line-marked ((t (:foreground ,base0B))))
  258.    `(diredp-no-priv ((t (:background nil))))
  259.    `(diredp-number ((t (:foreground ,base0A))))
  260.    `(diredp-other-priv ((t (:background nil :foreground ,base0E))))
  261.    `(diredp-rare-priv ((t (:foreground ,base08 :background nil))))
  262.    `(diredp-read-priv ((t (:foreground ,base0B :background nil))))
  263.    `(diredp-symlink ((t (:foreground ,base0E))))
  264.    `(diredp-write-priv ((t (:foreground ,base0A :background nil))))
  265.  
  266.    ;; term and ansi-term
  267.    `(term-color-black ((t (:foreground ,base02 :background ,base00))))
  268.    `(term-color-white ((t (:foreground ,base05 :background ,base07))))
  269.    `(term-color-red ((t (:foreground ,base08 :background ,base08))))
  270.    `(term-color-yellow ((t (:foreground ,base0A :background ,base0A))))
  271.    `(term-color-green ((t (:foreground ,base0B :background ,base0B))))
  272.    `(term-color-cyan ((t (:foreground ,base0C :background ,base0C))))
  273.    `(term-color-blue ((t (:foreground ,base0D :background ,base0D))))
  274.    `(term-color-magenta ((t (:foreground ,base0E :background ,base0E))))
  275.  
  276.    `(link ((t (:foreground nil :underline t))))
  277.    `(widget-button ((t (:underline t))))
  278.    `(widget-field ((t (:background ,base03 :box (:line-width 1 :color ,base06)))))
  279.  
  280.    ;; Compilation (most faces politely inherit from 'success, 'error, 'warning etc.)
  281.    `(compilation-column-number ((t (:foreground ,base0A))))
  282.    `(compilation-line-number ((t (:foreground ,base0A))))
  283.    `(compilation-message-face ((t (:foreground ,base0D))))
  284.    `(compilation-mode-line-exit ((t (:foreground ,base0B))))
  285.    `(compilation-mode-line-fail ((t (:foreground ,base08))))
  286.    `(compilation-mode-line-run ((t (:foreground ,base0D))))
  287.  
  288.    ;; Grep
  289.    `(grep-context-face ((t (:foreground ,base04))))
  290.    `(grep-error-face ((t (:foreground ,base08 :weight bold :underline t))))
  291.    `(grep-hit-face ((t (:foreground ,base0D))))
  292.    `(grep-match-face ((t (:foreground nil :background nil :inherit match))))
  293.  
  294.    `(regex-tool-matched-face ((t (:foreground nil :background nil :inherit match))))
  295.  
  296.    ;; Cscope
  297.    `(cscope-file-face ((t (:foreground ,base0B))))
  298.    `(cscope-function-face ((t (:foreground ,base0D))))
  299.    `(cscope-line-number-face ((t (:foreground ,base0A))))
  300.    `(cscope-mouse-face ((t (:background ,base01 :foreground ,base04))))
  301.    `(cscope-separator-face ((t (:foreground ,base08 :overline t :underline t :weight bold))))
  302.  
  303.    ;; mark-multiple
  304.    `(mm/master-face ((t (:inherit region :foreground nil :background nil))))
  305.    `(mm/mirror-face ((t (:inherit region :foreground nil :background nil))))
  306.  
  307.    ;; org-mode
  308.    `(org-agenda-structure ((t (:foreground ,base0E))))
  309.    `(org-agenda-date ((t (:foreground ,base0D :underline nil))))
  310.    `(org-agenda-done ((t (:foreground ,base0B))))
  311.    `(org-agenda-dimmed-todo-face ((t (:foreground ,base04))))
  312.    `(org-block ((t (:foreground ,base05 :background "#282828"))))
  313.    `(org-block-begin-line ((t (:background "#333333"))))
  314.    `(org-block-end-line ((t (:background "#333333"))))
  315.    `(org-code ((t (:foreground ,base0A))))
  316.    `(org-column ((t (:background ,base01))))
  317.    `(org-column-title ((t (:inherit org-column :weight bold :underline t))))
  318.    `(org-date ((t (:foreground ,base0E :underline t))))
  319.    `(org-document-info ((t (:foreground ,base0C))))
  320.    `(org-document-info-keyword ((t (:foreground ,base0B))))
  321.    `(org-document-title ((t (:weight bold :foreground ,base09 :height 1.44))))
  322.    `(org-done ((t (:foreground ,base0B))))
  323.    `(org-ellipsis ((t (:foreground ,base04))))
  324.    `(org-footnote ((t (:foreground ,base0C))))
  325.    `(org-formula ((t (:foreground ,base08))))
  326.    `(org-hide ((t (:foreground ,base03))))
  327.    `(org-link ((t (:foreground ,base0D))))
  328.    `(org-scheduled ((t (:foreground ,base0B))))
  329.    `(org-scheduled-previously ((t (:foreground ,base09))))
  330.    `(org-scheduled-today ((t (:foreground ,base0B))))
  331.    `(org-special-keyword ((t (:foreground ,base09))))
  332.    `(org-table ((t (:foreground ,base0E))))
  333.    `(org-todo ((t (:foreground ,base08))))
  334.    `(org-upcoming-deadline ((t (:foreground ,base09))))
  335.    `(org-warning ((t (:weight bold :foreground ,base08))))
  336.  
  337.    `(markdown-url-face ((t (:inherit link))))
  338.    `(markdown-link-face ((t (:foreground ,base0D :underline t))))
  339.  
  340.    `(hl-sexp-face ((t (:background ,base03))))
  341.    `(highlight-80+ ((t (:background ,base03))))
  342.  
  343.    ;; Python-specific overrides
  344.    `(py-builtins-face ((t (:foreground ,base09 :weight normal))))
  345.  
  346.    ;; js2-mode
  347.    `(js2-warning-face ((t (:underline ,base09))))
  348.    `(js2-error-face ((t (:foreground nil :underline ,base08))))
  349.    `(js2-external-variable-face ((t (:foreground ,base0E))))
  350.    `(js2-function-param-face ((t (:foreground ,base0D))))
  351.    `(js2-instance-member-face ((t (:foreground ,base0D))))
  352.    `(js2-private-function-call-face ((t (:foreground ,base08))))
  353.  
  354.    ;; js3-mode
  355.    `(js3-warning-face ((t (:underline ,base09))))
  356.    `(js3-error-face ((t (:foreground nil :underline ,base08))))
  357.    `(js3-external-variable-face ((t (:foreground ,base0E))))
  358.    `(js3-function-param-face ((t (:foreground ,base0D))))
  359.    `(js3-jsdoc-tag-face ((t (:foreground ,base09))))
  360.    `(js3-jsdoc-type-face ((t (:foreground ,base0C))))
  361.    `(js3-jsdoc-value-face ((t (:foreground ,base0A))))
  362.    `(js3-jsdoc-html-tag-name-face ((t (:foreground ,base0D))))
  363.    `(js3-jsdoc-html-tag-delimiter-face ((t (:foreground ,base0B))))
  364.    `(js3-instance-member-face ((t (:foreground ,base0D))))
  365.    `(js3-private-function-call-face ((t (:foreground ,base08))))
  366.  
  367.    ;; nxml
  368.    `(nxml-name-face ((t (:foreground unspecified :inherit font-lock-constant-face))))
  369.    `(nxml-attribute-local-name-face ((t (:foreground unspecified :inherit font-lock-variable-name-face))))
  370.    `(nxml-ref-face ((t (:foreground unspecified :inherit font-lock-preprocessor-face))))
  371.    `(nxml-delimiter-face ((t (:foreground unspecified :inherit font-lock-keyword-face))))
  372.    `(nxml-delimited-data-face ((t (:foreground unspecified :inherit font-lock-string-face))))
  373.    `(rng-error-face ((t (:underline ,base08))))
  374.  
  375.    ;; RHTML
  376.    `(erb-delim-face ((t (:background ,base03))))
  377.    `(erb-exec-face ((t (:background ,base03 :weight bold))))
  378.    `(erb-exec-delim-face ((t (:background ,base03))))
  379.    `(erb-out-face ((t (:background ,base03 :weight bold))))
  380.    `(erb-out-delim-face ((t (:background ,base03))))
  381.    `(erb-comment-face ((t (:background ,base03 :weight bold :slant italic))))
  382.    `(erb-comment-delim-face ((t (:background ,base03))))
  383.  
  384.    ;; Message-mode
  385.    `(message-header-other ((t (:foreground nil :background nil :weight normal))))
  386.    `(message-header-subject ((t (:inherit message-header-other :weight bold :foreground ,base0A))))
  387.    `(message-header-to ((t (:inherit message-header-other :weight bold :foreground ,base09))))
  388.    `(message-header-cc ((t (:inherit message-header-to :foreground nil))))
  389.    `(message-header-name ((t (:foreground ,base0D :background nil))))
  390.    `(message-header-newsgroups ((t (:foreground ,base0C :background nil :slant normal))))
  391.    `(message-separator ((t (:foreground ,base0E))))
  392.  
  393.    ;; Jabber
  394.    `(jabber-chat-prompt-local ((t (:foreground ,base0A))))
  395.    `(jabber-chat-prompt-foreign ((t (:foreground ,base09))))
  396.    `(jabber-chat-prompt-system ((t (:foreground ,base0A :weight bold))))
  397.    `(jabber-chat-text-local ((t (:foreground ,base0A))))
  398.    `(jabber-chat-text-foreign ((t (:foreground ,base09))))
  399.    `(jabber-chat-text-error ((t (:foreground ,base08))))
  400.  
  401.    `(jabber-roster-user-online ((t (:foreground ,base0B))))
  402.    `(jabber-roster-user-xa ((t :foreground ,base04)))
  403.    `(jabber-roster-user-dnd ((t :foreground ,base0A)))
  404.    `(jabber-roster-user-away ((t (:foreground ,base09))))
  405.    `(jabber-roster-user-chatty ((t (:foreground ,base0E))))
  406.    `(jabber-roster-user-error ((t (:foreground ,base08))))
  407.    `(jabber-roster-user-offline ((t (:foreground ,base04))))
  408.  
  409.    `(jabber-rare-time-face ((t (:foreground ,base04))))
  410.    `(jabber-activity-face ((t (:foreground ,base0E))))
  411.    `(jabber-activity-personal-face ((t (:foreground ,base0C))))
  412.  
  413.    ;; Gnus
  414.    `(gnus-cite-1 ((t (:inherit outline-1 :foreground nil))))
  415.    `(gnus-cite-2 ((t (:inherit outline-2 :foreground nil))))
  416.    `(gnus-cite-3 ((t (:inherit outline-3 :foreground nil))))
  417.    `(gnus-cite-4 ((t (:inherit outline-4 :foreground nil))))
  418.    `(gnus-cite-5 ((t (:inherit outline-5 :foreground nil))))
  419.    `(gnus-cite-6 ((t (:inherit outline-6 :foreground nil))))
  420.    `(gnus-cite-7 ((t (:inherit outline-7 :foreground nil))))
  421.    `(gnus-cite-8 ((t (:inherit outline-8 :foreground nil))))
  422.    ;; there are several more -cite- faces...
  423.    `(gnus-header-content ((t (:inherit message-header-other))))
  424.    `(gnus-header-subject ((t (:inherit message-header-subject))))
  425.    `(gnus-header-from ((t (:inherit message-header-other-face :weight bold :foreground ,base09))))
  426.    `(gnus-header-name ((t (:inherit message-header-name))))
  427.    `(gnus-button ((t (:inherit link :foreground nil))))
  428.    `(gnus-signature ((t (:inherit font-lock-comment-face))))
  429.  
  430.    `(gnus-summary-normal-unread ((t (:foreground ,base0D :weight normal))))
  431.    `(gnus-summary-normal-read ((t (:foreground ,base06 :weight normal))))
  432.    `(gnus-summary-normal-ancient ((t (:foreground ,base0C :weight normal))))
  433.    `(gnus-summary-normal-ticked ((t (:foreground ,base09 :weight normal))))
  434.    `(gnus-summary-low-unread ((t (:foreground ,base04 :weight normal))))
  435.    `(gnus-summary-low-read ((t (:foreground ,base04 :weight normal))))
  436.    `(gnus-summary-low-ancient ((t (:foreground ,base04 :weight normal))))
  437.    `(gnus-summary-high-unread ((t (:foreground ,base0A :weight normal))))
  438.    `(gnus-summary-high-read ((t (:foreground ,base0B :weight normal))))
  439.    `(gnus-summary-high-ancient ((t (:foreground ,base0B :weight normal))))
  440.    `(gnus-summary-high-ticked ((t (:foreground ,base09 :weight normal))))
  441.    `(gnus-summary-cancelled ((t (:foreground ,base08 :background nil :weight normal))))
  442.  
  443.    `(gnus-group-mail-low ((t (:foreground ,base04))))
  444.    `(gnus-group-mail-low-empty ((t (:foreground ,base04))))
  445.    `(gnus-group-mail-1 ((t (:foreground nil :weight normal :inherit outline-1))))
  446.    `(gnus-group-mail-2 ((t (:foreground nil :weight normal :inherit outline-2))))
  447.    `(gnus-group-mail-3 ((t (:foreground nil :weight normal :inherit outline-3))))
  448.    `(gnus-group-mail-4 ((t (:foreground nil :weight normal :inherit outline-4))))
  449.    `(gnus-group-mail-5 ((t (:foreground nil :weight normal :inherit outline-5))))
  450.    `(gnus-group-mail-6 ((t (:foreground nil :weight normal :inherit outline-6))))
  451.    `(gnus-group-mail-1-empty ((t (:inherit gnus-group-mail-1 :foreground ,base04))))
  452.    `(gnus-group-mail-2-empty ((t (:inherit gnus-group-mail-2 :foreground ,base04))))
  453.    `(gnus-group-mail-3-empty ((t (:inherit gnus-group-mail-3 :foreground ,base04))))
  454.    `(gnus-group-mail-4-empty ((t (:inherit gnus-group-mail-4 :foreground ,base04))))
  455.    `(gnus-group-mail-5-empty ((t (:inherit gnus-group-mail-5 :foreground ,base04))))
  456.    `(gnus-group-mail-6-empty ((t (:inherit gnus-group-mail-6 :foreground ,base04))))
  457.    `(gnus-group-news-1 ((t (:foreground nil :weight normal :inherit outline-5))))
  458.    `(gnus-group-news-2 ((t (:foreground nil :weight normal :inherit outline-6))))
  459.    `(gnus-group-news-3 ((t (:foreground nil :weight normal :inherit outline-7))))
  460.    `(gnus-group-news-4 ((t (:foreground nil :weight normal :inherit outline-8))))
  461.    `(gnus-group-news-5 ((t (:foreground nil :weight normal :inherit outline-1))))
  462.    `(gnus-group-news-6 ((t (:foreground nil :weight normal :inherit outline-2))))
  463.    `(gnus-group-news-1-empty ((t (:inherit gnus-group-news-1 :foreground ,base04))))
  464.    `(gnus-group-news-2-empty ((t (:inherit gnus-group-news-2 :foreground ,base04))))
  465.    `(gnus-group-news-3-empty ((t (:inherit gnus-group-news-3 :foreground ,base04))))
  466.    `(gnus-group-news-4-empty ((t (:inherit gnus-group-news-4 :foreground ,base04))))
  467.    `(gnus-group-news-5-empty ((t (:inherit gnus-group-news-5 :foreground ,base04))))
  468.    `(gnus-group-news-6-empty ((t (:inherit gnus-group-news-6 :foreground ,base04))))
  469.  
  470.    `(erc-direct-msg-face ((t (:foreground ,base09))))
  471.    `(erc-error-face ((t (:foreground ,base08))))
  472.    `(erc-header-face ((t (:foreground ,base06 :background ,base04))))
  473.    `(erc-input-face ((t (:foreground ,base0B))))
  474.    `(erc-keyword-face ((t (:foreground ,base0A))))
  475.    `(erc-current-nick-face ((t (:foreground ,base0B))))
  476.    `(erc-my-nick-face ((t (:foreground ,base0B))))
  477.    `(erc-nick-default-face ((t (:weight normal :foreground ,base0E))))
  478.    `(erc-nick-msg-face ((t (:weight normal :foreground ,base0A))))
  479.    `(erc-notice-face ((t (:foreground ,base04))))
  480.    `(erc-pal-face ((t (:foreground ,base09))))
  481.    `(erc-prompt-face ((t (:foreground ,base0D))))
  482.    `(erc-timestamp-face ((t (:foreground ,base0C))))
  483.  
  484.    ;; helm
  485.    `(helm-M-x-key ((t (:foreground ,base0C))))
  486.    `(helm-action ((t (:foreground ,base05))))
  487.    `(helm-buffer-directory ((t (:foreground ,base04 :background nil :weight bold))))
  488.    `(helm-buffer-file ((t (:foreground ,base0C))))
  489.    `(helm-buffer-not-saved ((t (:foreground ,base08))))
  490.    `(helm-buffer-process ((t (:foreground ,base03))))
  491.    `(helm-buffer-saved-out ((t (:foreground ,base0F))))
  492.    `(helm-buffer-size ((t (:foreground ,base09))))
  493.    `(helm-candidate-number ((t (:foreground ,base00 :background ,base09))))
  494.    `(helm-ff-directory ((t (:foreground ,base04 :background nil :weight bold))))
  495.    `(helm-ff-executable ((t (:foreground ,base0B))))
  496.    `(helm-ff-file ((t (:foreground ,base0C))))
  497.    `(helm-ff-invalid-symlink ((t (:foreground ,base00 :background ,base08))))
  498.    `(helm-ff-prefix ((t (:foreground nil :background nil))))
  499.    `(helm-ff-symlink ((t (:foreground ,base00 :background ,base0C))))
  500.    `(helm-grep-cmd-line ((t (:foreground ,base0B))))
  501.    `(helm-grep-file ((t (:foreground ,base0C))))
  502.    `(helm-grep-finish ((t (:foreground ,base00 :background ,base09))))
  503.    `(helm-grep-lineno ((t (:foreground ,base03))))
  504.    `(helm-grep-match ((t (:foreground ,base0A))))
  505.    `(helm-grep-running ((t (:foreground ,base09))))
  506.    `(helm-header ((t (:foreground ,base0A :background ,base00 :underline nil))))
  507.    `(helm-match ((t (:foreground ,base0A))))
  508.    `(helm-moccur-buffer ((t (:foreground ,base0C))))
  509.    `(helm-selection ((t (:foreground nil :background ,base02 :underline nil))))
  510.    `(helm-selection-line ((t (:foreground nil :background ,base02))))
  511.    `(helm-separator ((t (:foreground ,base02))))
  512.    `(helm-source-header ((t (:foreground ,base05 :background ,base01 :weight bold))))
  513.    `(helm-visible-mark ((t (:foreground ,base00 :background ,base0B))))
  514.  
  515.    `(custom-variable-tag ((t (:foreground ,base0D))))
  516.    `(custom-group-tag ((t (:foreground ,base0D))))
  517.    `(custom-state ((t (:foreground ,base0B)))))
  518.  
  519.  
  520.   (custom-theme-set-variables
  521.    'base16-papercolor-dark
  522.  
  523.    `(ansi-color-names-vector
  524.      ;; black, base08, base0B, base0A, base0D, magenta, cyan, white
  525.      [,base00 ,base08 ,base0B ,base0A ,base0D ,base0E ,base0D ,base05])
  526.    `(ansi-term-color-vector
  527.      ;; black, base08, base0B, base0A, base0D, magenta, cyan, white
  528.      [unspecified ,base00 ,base08 ,base0B ,base0A ,base0D ,base0E ,base0D ,base05])))
  529.  
  530. (provide-theme 'base16-papercolor-dark)
  531.  
  532. ;;; base16-papercolor-dark-theme.el ends here
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!