Download
(eval-when-compile (require 'color-theme))
(defun color-theme-black-purple ()
"Color theme by Anonymous, created 2012-03-09."
(interactive)
(color-theme-install
'(color-theme-black-purple
((background-color . "#000000")
(background-mode . dark)
(border-color . "black")
(cursor-color . "MediumOrchid")
(foreground-color . "purple")
(mouse-color . "black"))
((ac-fuzzy-cursor-color . "red")
(apropos-keybinding-face . underline)
(apropos-label-face italic variable-pitch)
(apropos-match-face . match)
(apropos-property-face . bold-italic)
(apropos-symbol-face . bold)
(compilation-message-face . underline)
(gnus-article-button-face . gnus-button)
(gnus-article-mouse-face . highlight)
(gnus-mouse-face . highlight)
(gnus-signature-face . gnus-signature)
(gnus-summary-selected-face . gnus-summary-selected)
(gnus-treat-display-face . head)
(ispell-highlight-face . isearch)
(list-matching-lines-buffer-name-face . underline)
(list-matching-lines-face . match)
(mime-button-face . bold)
(mime-button-mouse-face . highlight)
(org-goto-interface . outline)
(tags-tag-face . default)
(view-highlight-face . highlight)
(widget-mouse-face . highlight))
(default ((t (:stipple nil :background "black" :foreground "purple" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 120 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
(ac-candidate-face ((t (:background "lightgray" :foreground "black"))))
(ac-completion-face ((t (:foreground "darkgray" :underline t))))
(ac-gtags-candidate-face ((t (:background "lightgray" :foreground "navy"))))
(ac-gtags-selection-face ((t (:background "navy" :foreground "white"))))
(ac-selection-face ((t (:background "steelblue" :foreground "white"))))
(ac-yasnippet-candidate-face ((t (:background "sandybrown" :foreground "black"))))
(ac-yasnippet-selection-face ((t (:background "coral3" :foreground "white"))))
(better-fringes-bitmap ((t (:foreground "dark khaki"))))
(better-fringes-important-bitmap ((t (:foreground "red"))))
(bg:erc-color-face0 ((t (:background "White"))))
(bg:erc-color-face1 ((t (:background "black"))))
(bg:erc-color-face10 ((t (:background "lightblue1"))))
(bg:erc-color-face11 ((t (:background "cyan"))))
(bg:erc-color-face12 ((t (:background "blue"))))
(bg:erc-color-face13 ((t (:background "deeppink"))))
(bg:erc-color-face14 ((t (:background "gray50"))))
(bg:erc-color-face15 ((t (:background "gray90"))))
(bg:erc-color-face2 ((t (:background "blue4"))))
(bg:erc-color-face3 ((t (:background "green4"))))
(bg:erc-color-face4 ((t (:background "red"))))
(bg:erc-color-face5 ((t (:background "brown"))))
(bg:erc-color-face6 ((t (:background "purple"))))
(bg:erc-color-face7 ((t (:background "orange"))))
(bg:erc-color-face8 ((t (:background "yellow"))))
(bg:erc-color-face9 ((t (:background "green"))))
(bold ((t (:bold t :weight bold))))
(bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
(bookmark-menu-heading ((t (:foreground "Blue3"))))
(border ((t (nil))))
(buffer-menu-buffer ((t (:bold t :weight bold))))
(button ((t (:underline t))))
(change-log-acknowledgement ((t (:foreground "DeepPink4"))))
(change-log-conditionals ((t (:foreground "White"))))
(change-log-date ((t (:foreground "Sienna"))))
(change-log-email ((t (:foreground "White"))))
(change-log-file ((t (:foreground "Red"))))
(change-log-function ((t (:foreground "White"))))
(change-log-list ((t (:foreground "RoyalBlue"))))
(change-log-name ((t (:foreground "Gold"))))
(comint-highlight-input ((t (:bold t :weight bold))))
(comint-highlight-prompt ((t (:foreground "cyan1"))))
(compilation-column-number ((t (:foreground "Blue3"))))
(compilation-error ((t (:bold t :weight bold :foreground "Pink"))))
(compilation-info ((t (:bold t :foreground "Green1" :weight bold))))
(compilation-line-number ((t (:foreground "White"))))
(compilation-warning ((t (:bold t :foreground "Orange" :weight bold))))
(completions-annotations ((t (:italic t :slant italic))))
(completions-common-part ((t (:family "DejaVu Sans Mono" :foundry "unknown" :width normal :weight normal :slant normal :underline nil :overline nil :strike-through nil :box nil :inverse-video nil :foreground "purple" :background "black" :stipple nil :height 120))))
(completions-first-difference ((t (:bold t :weight bold))))
(cursor ((t (:background "MediumOrchid"))))
(custom-button ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
(custom-button-mouse ((t (:background "grey90" :foreground "black" :box (:line-width 2 :style released-button)))))
(custom-button-pressed ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
(custom-button-pressed-unraised ((t (:underline t :foreground "violet"))))
(custom-button-unraised ((t (:underline t))))
(custom-changed ((t (:background "blue1" :foreground "white"))))
(custom-comment ((t (:background "dim gray"))))
(custom-comment-tag ((t (:foreground "gray80"))))
(custom-documentation ((t (nil))))
(custom-face-tag ((t (:bold t :weight bold :foreground "light blue"))))
(custom-group-tag ((t (:bold t :family "Sans Serif" :foreground "light blue" :weight bold :height 1.2))))
(custom-group-tag-1 ((t (:bold t :family "Sans Serif" :foreground "pink" :weight bold :height 1.2))))
(custom-invalid ((t (:background "red1" :foreground "yellow1"))))
(custom-link ((t (:underline t :foreground "cyan1"))))
(custom-modified ((t (:background "blue1" :foreground "white"))))
(custom-rogue ((t (:background "black" :foreground "pink"))))
(custom-saved ((t (:underline t))))
(custom-set ((t (:background "white" :foreground "blue1"))))
(custom-state ((t (:foreground "lime green"))))
(custom-themed ((t (:background "blue1" :foreground "white"))))
(custom-variable-button ((t (:bold t :underline t :weight bold))))
(custom-variable-tag ((t (:bold t :foreground "light blue" :weight bold))))
(custom-visibility ((t (:underline t :foreground "cyan1" :height 0.8))))
(diff-added ((t (nil))))
(diff-changed ((t (nil))))
(diff-context ((t (:foreground "grey70"))))
(diff-file-header ((t (:bold t :background "grey60" :weight bold))))
(diff-function ((t (:background "grey45"))))
(diff-header ((t (:background "grey45"))))
(diff-hunk-header ((t (:background "grey45"))))
(diff-index ((t (:bold t :weight bold :background "grey60"))))
(diff-indicator-added ((t (nil))))
(diff-indicator-changed ((t (nil))))
(diff-indicator-removed ((t (nil))))
(diff-nonexistent ((t (:bold t :weight bold :background "grey60"))))
(diff-refine-change ((t (:background "grey60"))))
(diff-removed ((t (nil))))
(dired-directory ((t (:foreground "Red"))))
(dired-flagged ((t (:bold t :weight bold :foreground "Pink"))))
(dired-header ((t (:foreground "Blue3"))))
(dired-ignored ((t (:foreground "grey70"))))
(dired-mark ((t (:foreground "Gold"))))
(dired-marked ((t (:bold t :weight bold :foreground "Pink"))))
(dired-perm-write ((t (:foreground "DeepPink4"))))
(dired-symlink ((t (:foreground "RoyalBlue"))))
(dired-warning ((t (:bold t :weight bold :foreground "Pink"))))
(ediff-current-diff-A ((t (:background "pale green" :foreground "firebrick"))))
(ediff-current-diff-Ancestor ((t (:background "VioletRed" :foreground "Black"))))
(ediff-current-diff-B ((t (:background "Yellow" :foreground "DarkOrchid"))))
(ediff-current-diff-C ((t (:background "Pink" :foreground "Navy"))))
(ediff-even-diff-A ((t (:background "light grey" :foreground "Black"))))
(ediff-even-diff-Ancestor ((t (:background "Grey" :foreground "White"))))
(ediff-even-diff-B ((t (:background "Grey" :foreground "White"))))
(ediff-even-diff-C ((t (:background "light grey" :foreground "Black"))))
(ediff-fine-diff-A ((t (:background "sky blue" :foreground "Navy"))))
(ediff-fine-diff-Ancestor ((t (:background "Green" :foreground "Black"))))
(ediff-fine-diff-B ((t (:background "cyan" :foreground "Black"))))
(ediff-fine-diff-C ((t (:background "Turquoise" :foreground "Black"))))
(ediff-odd-diff-A ((t (:background "Grey" :foreground "White"))))
(ediff-odd-diff-Ancestor ((t (:background "gray40" :foreground "cyan3"))))
(ediff-odd-diff-B ((t (:background "light grey" :foreground "Black"))))
(ediff-odd-diff-C ((t (:background "Grey" :foreground "White"))))
(eieio-custom-slot-tag-face ((t (:foreground "light blue"))))
(eldoc-highlight-function-argument ((t (:bold t :weight bold))))
(erc-action-face ((t (:bold t :weight bold))))
(erc-bold-face ((t (:bold t :weight bold))))
(erc-command-indicator-face ((t (:bold t :weight bold))))
(erc-default-face ((t (nil))))
(erc-direct-msg-face ((t (:foreground "IndianRed"))))
(erc-error-face ((t (:foreground "red"))))
(erc-header-line ((t (:background "grey90" :foreground "grey20"))))
(erc-input-face ((t (:foreground "brown"))))
(erc-inverse-face ((t (:background "Black" :foreground "White"))))
(erc-my-nick-face ((t (:bold t :foreground "brown" :weight bold))))
(erc-nick-default-face ((t (:bold t :weight bold))))
(erc-nick-msg-face ((t (:bold t :foreground "IndianRed" :weight bold))))
(erc-notice-face ((t (:bold t :foreground "SlateBlue" :weight bold))))
(erc-prompt-face ((t (:bold t :background "lightBlue2" :foreground "Black" :weight bold))))
(erc-underline-face ((t (:underline t))))
(escape-glyph ((t (:foreground "cyan"))))
(fg:erc-color-face0 ((t (:foreground "White"))))
(fg:erc-color-face1 ((t (:foreground "black"))))
(fg:erc-color-face10 ((t (:foreground "lightblue1"))))
(fg:erc-color-face11 ((t (:foreground "cyan"))))
(fg:erc-color-face12 ((t (:foreground "blue"))))
(fg:erc-color-face13 ((t (:foreground "deeppink"))))
(fg:erc-color-face14 ((t (:foreground "gray50"))))
(fg:erc-color-face15 ((t (:foreground "gray90"))))
(fg:erc-color-face2 ((t (:foreground "blue4"))))
(fg:erc-color-face3 ((t (:foreground "green4"))))
(fg:erc-color-face4 ((t (:foreground "red"))))
(fg:erc-color-face5 ((t (:foreground "brown"))))
(fg:erc-color-face6 ((t (:foreground "purple"))))
(fg:erc-color-face7 ((t (:foreground "orange"))))
(fg:erc-color-face8 ((t (:foreground "yellow"))))
(fg:erc-color-face9 ((t (:foreground "green"))))
(file-name-shadow ((t (:foreground "grey70"))))
(fixed-pitch ((t (:family "Monospace"))))
(flymake-errline ((t (:background "Firebrick4"))))
(flymake-warnline ((t (:background "DarkBlue"))))
(flyspell-duplicate ((t (:bold t :foreground "Gold3" :underline t :weight bold))))
(flyspell-incorrect ((t (:bold t :foreground "OrangeRed" :underline t :weight bold))))
(font-lock-builtin-face ((t (:foreground "LightSteelBlue"))))
(font-lock-comment-delimiter-face ((t (:foreground "DeepPink4"))))
(font-lock-comment-face ((t (:foreground "DeepPink4"))))
(font-lock-constant-face ((t (:foreground "Gold"))))
(font-lock-doc-face ((t (:foreground "Sienna"))))
(font-lock-function-name-face ((t (:foreground "Red"))))
(font-lock-keyword-face ((t (:foreground "RoyalBlue"))))
(font-lock-negation-char-face ((t (nil))))
(font-lock-preprocessor-face ((t (:foreground "LightSteelBlue"))))
(font-lock-regexp-grouping-backslash ((t (:bold t :weight bold))))
(font-lock-regexp-grouping-construct ((t (:bold t :weight bold))))
(font-lock-string-face ((t (:foreground "Sienna"))))
(font-lock-type-face ((t (:foreground "Blue3"))))
(font-lock-variable-name-face ((t (:foreground "White"))))
(font-lock-warning-face ((t (:bold t :foreground "Pink" :weight bold))))
(fringe ((t (:background "grey10"))))
(gnus-button ((t (:bold t :weight bold))))
(gnus-emphasis-bold ((t (:bold t :weight bold))))
(gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
(gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
(gnus-emphasis-italic ((t (:italic t :slant italic))))
(gnus-emphasis-strikethru ((t (:strike-through t))))
(gnus-emphasis-underline ((t (:underline t))))
(gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
(gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
(gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
(gnus-group-mail-1 ((t (:bold t :foreground "#e1ffe1" :weight bold))))
(gnus-group-mail-1-empty ((t (:foreground "#e1ffe1"))))
(gnus-group-mail-2 ((t (:bold t :foreground "DarkSeaGreen1" :weight bold))))
(gnus-group-mail-2-empty ((t (:foreground "DarkSeaGreen1"))))
(gnus-group-mail-3 ((t (:bold t :foreground "aquamarine1" :weight bold))))
(gnus-group-mail-3-empty ((t (:foreground "aquamarine1"))))
(gnus-group-mail-low ((t (:bold t :foreground "aquamarine2" :weight bold))))
(gnus-group-mail-low-empty ((t (:foreground "aquamarine2"))))
(gnus-group-news-1 ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
(gnus-group-news-1-empty ((t (:foreground "PaleTurquoise"))))
(gnus-group-news-2 ((t (:bold t :foreground "turquoise" :weight bold))))
(gnus-group-news-2-empty ((t (:foreground "turquoise"))))
(gnus-group-news-3 ((t (:bold t :weight bold))))
(gnus-group-news-3-empty ((t (nil))))
(gnus-group-news-4 ((t (:bold t :weight bold))))
(gnus-group-news-4-empty ((t (nil))))
(gnus-group-news-5 ((t (:bold t :weight bold))))
(gnus-group-news-5-empty ((t (nil))))
(gnus-group-news-6 ((t (:bold t :weight bold))))
(gnus-group-news-6-empty ((t (nil))))
(gnus-group-news-low ((t (:bold t :foreground "DarkTurquoise" :weight bold))))
(gnus-group-news-low-empty ((t (:foreground "DarkTurquoise"))))
(gnus-header-content ((t (:italic t :foreground "SpringGreen1" :slant italic))))
(gnus-header-from ((t (:foreground "PaleGreen1"))))
(gnus-header-name ((t (:foreground "SpringGreen2"))))
(gnus-header-newsgroups ((t (:italic t :foreground "yellow" :slant italic))))
(gnus-header-subject ((t (:foreground "SeaGreen1"))))
(gnus-notify+-modeline-face ((t (:foreground "Gold"))))
(gnus-signature ((t (:italic t :slant italic))))
(gnus-splash ((t (:foreground "#cccccc"))))
(gnus-summary-cancelled ((t (:background "black" :foreground "yellow"))))
(gnus-summary-high-ancient ((t (:bold t :foreground "SkyBlue" :weight bold))))
(gnus-summary-high-read ((t (:bold t :foreground "PaleGreen" :weight bold))))
(gnus-summary-high-ticked ((t (:bold t :foreground "pink" :weight bold))))
(gnus-summary-high-undownloaded ((t (:bold t :foreground "LightGray" :weight bold))))
(gnus-summary-high-unread ((t (:bold t :weight bold))))
(gnus-summary-low-ancient ((t (:italic t :foreground "SkyBlue" :slant italic))))
(gnus-summary-low-read ((t (:italic t :foreground "PaleGreen" :slant italic))))
(gnus-summary-low-ticked ((t (:italic t :foreground "pink" :slant italic))))
(gnus-summary-low-undownloaded ((t (:italic t :foreground "LightGray" :slant italic :weight normal))))
(gnus-summary-low-unread ((t (:italic t :slant italic))))
(gnus-summary-normal-ancient ((t (:foreground "SkyBlue"))))
(gnus-summary-normal-read ((t (:foreground "PaleGreen"))))
(gnus-summary-normal-ticked ((t (:foreground "pink"))))
(gnus-summary-normal-undownloaded ((t (:foreground "LightGray" :weight normal))))
(gnus-summary-normal-unread ((t (nil))))
(gnus-summary-selected ((t (:underline t))))
(header-line ((t (:box (:line-width -1 :style released-button) :background "grey20" :foreground "grey90" :box nil))))
(help-argument-name ((t (:italic t :slant italic))))
(hi-mumamo-black-b ((t (:bold t :underline t :weight bold))))
(hi-mumamo-blue ((t (:underline "light blue"))))
(hi-mumamo-blue-b ((t (:bold t :underline "blue1" :weight bold))))
(hi-mumamo-green ((t (:underline "green1"))))
(hi-mumamo-green-b ((t (:bold t :underline "green1" :weight bold))))
(hi-mumamo-pink ((t (:underline "pink"))))
(hi-mumamo-red-b ((t (:bold t :underline "red1" :weight bold))))
(hi-mumamo-yellow ((t (:underline "yellow1"))))
(highlight ((t (:background "darkolivegreen"))))
(ido-first-match ((t (:bold t :weight bold))))
(ido-incomplete-regexp ((t (:bold t :weight bold :foreground "Pink"))))
(ido-indicator ((t (:background "red1" :foreground "yellow1" :width condensed))))
(ido-only-match ((t (:foreground "ForestGreen"))))
(ido-subdir ((t (:foreground "red1"))))
(isearch ((t (:background "palevioletred2" :foreground "brown4"))))
(isearch-fail ((t (:background "red4"))))
(italic ((t (:italic t :slant italic))))
(jabber-activity-face ((t (:bold t :foreground "red" :weight bold))))
(jabber-activity-personal-face ((t (:bold t :foreground "blue" :weight bold))))
(jabber-chat-error ((t (:bold t :foreground "red" :weight bold))))
(jabber-chat-prompt-foreign ((t (:bold t :foreground "red" :weight bold))))
(jabber-chat-prompt-local ((t (:bold t :foreground "blue" :weight bold))))
(jabber-chat-prompt-system ((t (:bold t :foreground "green" :weight bold))))
(jabber-chat-text-foreign ((t (nil))))
(jabber-chat-text-local ((t (nil))))
(jabber-rare-time-face ((t (:foreground "darkgreen" :underline t))))
(jabber-roster-user-away ((t (:italic t :foreground "dark green" :slant italic :weight normal))))
(jabber-roster-user-chatty ((t (:bold t :foreground "dark orange" :slant normal :weight bold))))
(jabber-roster-user-dnd ((t (:italic t :foreground "red" :slant italic :weight normal))))
(jabber-roster-user-error ((t (:italic t :foreground "red" :slant italic :weight light))))
(jabber-roster-user-offline ((t (:italic t :foreground "dark grey" :slant italic :weight light))))
(jabber-roster-user-online ((t (:bold t :foreground "blue" :slant normal :weight bold))))
(jabber-roster-user-xa ((t (:italic t :foreground "magenta" :slant italic :weight normal))))
(jabber-title-large ((t (:bold t :family "Sans Serif" :weight bold :height 3.0 :width ultra-expanded))))
(jabber-title-medium ((t (:bold t :family "Sans Serif" :weight bold :height 2.0 :width expanded))))
(jabber-title-small ((t (:bold t :family "Sans Serif" :weight bold :height 1.0 :width semi-expanded))))
(jde-bug-breakpoint-cursor ((t (:background "brown" :foreground "cyan"))))
(jde-db-active-breakpoint-face ((t (:background "red" :foreground "black"))))
(jde-db-requested-breakpoint-face ((t (:background "yellow" :foreground "black"))))
(jde-db-spec-breakpoint-face ((t (:background "green" :foreground "black"))))
(jde-java-font-lock-api-face ((t (:foreground "light goldenrod"))))
(jde-java-font-lock-bold-face ((t (:bold t :weight bold))))
(jde-java-font-lock-code-face ((t (nil))))
(jde-java-font-lock-constant-face ((t (:foreground "Aquamarine"))))
(jde-java-font-lock-constructor-face ((t (:foreground "LightSteelBlue"))))
(jde-java-font-lock-doc-tag-face ((t (:foreground "light coral"))))
(jde-java-font-lock-italic-face ((t (:italic t :slant italic))))
(jde-java-font-lock-javadoc-face ((t (:foreground "Sienna"))))
(jde-java-font-lock-link-face ((t (:foreground "blue" :underline t :slant normal))))
(jde-java-font-lock-modifier-face ((t (:foreground "LightSteelBlue"))))
(jde-java-font-lock-number-face ((t (:foreground "LightSalmon"))))
(jde-java-font-lock-operator-face ((t (:foreground "medium blue"))))
(jde-java-font-lock-package-face ((t (:foreground "steelblue1"))))
(jde-java-font-lock-pre-face ((t (nil))))
(jde-java-font-lock-private-face ((t (:foreground "LightSteelBlue"))))
(jde-java-font-lock-protected-face ((t (:foreground "LightSteelBlue"))))
(jde-java-font-lock-public-face ((t (:foreground "LightSteelBlue"))))
(jde-java-font-lock-underline-face ((t (:underline t))))
(lazy-highlight ((t (:background "paleturquoise4"))))
(link ((t (:foreground "cyan1" :underline t))))
(link-visited ((t (:underline t :foreground "violet"))))
(linum ((t (:foreground "grey70"))))
(log-edit-header ((t (:foreground "RoyalBlue"))))
(log-edit-summary ((t (:foreground "Red"))))
(log-edit-unknown-header ((t (:foreground "DeepPink4"))))
(magit-branch ((t (:bold t :weight bold))))
(magit-diff-add ((t (:foreground "white"))))
(magit-diff-del ((t (:foreground "OrangeRed"))))
(magit-diff-file-header ((t (nil))))
(magit-diff-hunk-header ((t (:italic t :slant italic))))
(magit-diff-none ((t (nil))))
(magit-header ((t (nil))))
(magit-item-highlight ((t (:background "dim gray"))))
(magit-item-mark ((t (:foreground "orange"))))
(magit-log-graph ((t (:foreground "grey80"))))
(magit-log-head-label-bisect-bad ((t (:background "IndianRed1" :foreground "IndianRed4" :box 1))))
(magit-log-head-label-bisect-good ((t (:background "light green" :foreground "dark olive green" :box 1))))
(magit-log-head-label-local ((t (:background "Grey13" :foreground "LightSkyBlue1" :box 1))))
(magit-log-head-label-patches ((t (:background "IndianRed1" :foreground "IndianRed4" :box 1))))
(magit-log-head-label-remote ((t (:background "Grey11" :foreground "DarkSeaGreen2" :box 1))))
(magit-log-head-label-tags ((t (:background "LemonChiffon1" :foreground "goldenrod4" :box 1))))
(magit-log-message ((t (nil))))
(magit-log-sha1 ((t (:foreground "tomato"))))
(magit-log-tag-label ((t (:background "DarkGoldenRod"))))
(magit-menu-selected-option ((t (:foreground "orange"))))
(magit-section-title ((t (:bold t :weight bold))))
(match ((t (:background "RoyalBlue3"))))
(menu ((t (nil))))
(message-cited-text ((t (:foreground "LightPink1"))))
(message-header-cc ((t (:bold t :foreground "chartreuse1" :weight bold))))
(message-header-name ((t (:foreground "green"))))
(message-header-newsgroups ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold))))
(message-header-other ((t (:foreground "VioletRed1"))))
(message-header-subject ((t (:foreground "OliveDrab1"))))
(message-header-to ((t (:bold t :foreground "DarkOliveGreen1" :weight bold))))
(message-header-xheader ((t (:foreground "DeepSkyBlue1"))))
(message-mml ((t (:foreground "MediumSpringGreen"))))
(message-separator ((t (:foreground "LightSkyBlue1"))))
(minibuffer-prompt ((t (:foreground "cyan"))))
(mlinks-font-lock-face ((t (:underline t :foreground "cyan1"))))
(mlinks-hyperactive-link-face ((t (:foreground "brown4" :background "palevioletred2"))))
(mlinks-link-face ((t (:background "darkolivegreen"))))
(mm-uu-extract ((t (:background "dark green" :foreground "light yellow"))))
(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button)))))
(mode-line-buffer-id ((t (:bold t :weight bold))))
(mode-line-emphasis ((t (:bold t :weight bold))))
(mode-line-highlight ((t (:box (:line-width 2 :color "grey40" :style released-button)))))
(mode-line-inactive ((t (:background "grey30" :foreground "grey80" :box (:line-width -1 :color "grey40" :style nil) :weight light))))
(mouse ((t (:background "black"))))
(mumamo-background-chunk-major ((t (:background "#000030"))))
(mumamo-background-chunk-submode1 ((t (:background "#002000"))))
(mumamo-background-chunk-submode2 ((t (:background "#202000"))))
(mumamo-background-chunk-submode3 ((t (:background "#002020"))))
(mumamo-background-chunk-submode4 ((t (:background "#301000"))))
(mumamo-border-face-in ((t (:italic t :bold t :foreground "LightSteelBlue" :underline t :slant italic :weight bold))))
(mumamo-border-face-out ((t (:italic t :bold t :foreground "LightSteelBlue" :underline t :slant italic :weight bold))))
(next-error ((t (:background "LightCoral"))))
(nobreak-space ((t (:foreground "cyan" :underline t))))
(nxml-attribute-colon ((t (nil))))
(nxml-attribute-local-name ((t (:foreground "White"))))
(nxml-attribute-prefix ((t (:foreground "LightSteelBlue"))))
(nxml-attribute-value ((t (:foreground "Sienna"))))
(nxml-attribute-value-delimiter ((t (:foreground "Sienna"))))
(nxml-cdata-section-CDATA ((t (:foreground "LightSteelBlue"))))
(nxml-cdata-section-content ((t (nil))))
(nxml-cdata-section-delimiter ((t (nil))))
(nxml-char-ref-delimiter ((t (:foreground "Gold"))))
(nxml-char-ref-number ((t (:foreground "Gold"))))
(nxml-comment-content ((t (:foreground "DeepPink4"))))
(nxml-comment-delimiter ((t (:foreground "DeepPink4"))))
(nxml-delimited-data ((t (:foreground "Sienna"))))
(nxml-delimiter ((t (nil))))
(nxml-element-colon ((t (nil))))
(nxml-element-local-name ((t (:foreground "Red"))))
(nxml-element-prefix ((t (:foreground "LightSteelBlue"))))
(nxml-entity-ref-delimiter ((t (:foreground "Gold"))))
(nxml-entity-ref-name ((t (:foreground "Gold"))))
(nxml-glyph ((t (:background "light grey" :foreground "black" :slant normal :weight normal :foundry "misc" :family "fixed"))))
(nxml-hash ((t (:foreground "LightSteelBlue"))))
(nxml-heading ((t (:bold t :weight bold))))
(nxml-markup-declaration-delimiter ((t (nil))))
(nxml-name ((t (:foreground "LightSteelBlue"))))
(nxml-namespace-attribute-colon ((t (nil))))
(nxml-namespace-attribute-prefix ((t (:foreground "White"))))
(nxml-namespace-attribute-value ((t (:foreground "Sienna"))))
(nxml-namespace-attribute-value-delimiter ((t (:foreground "Sienna"))))
(nxml-namespace-attribute-xmlns ((t (:foreground "LightSteelBlue"))))
(nxml-outline-active-indicator ((t (:stipple nil :background "black" :foreground "purple" :inverse-video nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :width normal :foundry "unknown" :family "DejaVu Sans Mono" :box 1 :height 120))))
(nxml-outline-ellipsis ((t (:bold t :family "DejaVu Sans Mono" :foundry "unknown" :width normal :slant normal :underline nil :overline nil :strike-through nil :box nil :inverse-video nil :foreground "purple" :background "black" :stipple nil :weight bold :height 120))))
(nxml-outline-indicator ((t (:family "DejaVu Sans Mono" :foundry "unknown" :width normal :weight normal :slant normal :underline nil :overline nil :strike-through nil :box nil :inverse-video nil :foreground "purple" :background "black" :stipple nil :height 120))))
(nxml-processing-instruction-content ((t (:foreground "Sienna"))))
(nxml-processing-instruction-delimiter ((t (nil))))
(nxml-processing-instruction-target ((t (:foreground "RoyalBlue"))))
(nxml-prolog-keyword ((t (:foreground "RoyalBlue"))))
(nxml-prolog-literal-content ((t (:foreground "Sienna"))))
(nxml-prolog-literal-delimiter ((t (:foreground "Sienna"))))
(nxml-ref ((t (:foreground "Gold"))))
(nxml-tag-delimiter ((t (nil))))
(nxml-tag-slash ((t (nil))))
(nxml-text ((t (nil))))
(org-agenda-clocking ((t (:background "#300020"))))
(org-agenda-column-dateline ((t (:family "DejaVu Sans Mono" :weight normal :slant normal :underline nil :strike-through nil :background "grey30" :height 120))))
(org-agenda-date ((t (:foreground "LightSkyBlue"))))
(org-agenda-date-today ((t (:italic t :bold t :foreground "LightSkyBlue" :slant italic :weight bold))))
(org-agenda-date-weekend ((t (:bold t :foreground "LightSkyBlue" :weight bold))))
(org-agenda-dimmed-todo-face ((t (:foreground "grey50"))))
(org-agenda-done ((t (:foreground "PaleGreen"))))
(org-agenda-restriction-lock ((t (:background "skyblue4"))))
(org-agenda-structure ((t (:foreground "LightSkyBlue"))))
(org-archived ((t (:foreground "grey70"))))
(org-block ((t (:foreground "grey70"))))
(org-checkbox ((t (:bold t :weight bold))))
(org-checkbox-statistics-done ((t (:bold t :weight bold :foreground "PaleGreen"))))
(org-checkbox-statistics-todo ((t (:bold t :weight bold :foreground "Pink"))))
(org-clock-overlay ((t (:background "SkyBlue4"))))
(org-code ((t (:foreground "grey70"))))
(org-column ((t (:background "grey30" :strike-through nil :underline nil :slant normal :weight normal :height 120 :family "DejaVu Sans Mono"))))
(org-column-title ((t (:bold t :background "grey30" :underline t :weight bold))))
(org-date ((t (:foreground "Cyan" :underline t))))
(org-done ((t (:bold t :foreground "PaleGreen" :weight bold))))
(org-drawer ((t (:foreground "LightSkyBlue"))))
(org-ellipsis ((t (:foreground "LightGoldenrod" :underline t))))
(org-footnote ((t (:foreground "Cyan" :underline t))))
(org-formula ((t (:foreground "chocolate1"))))
(org-headline-done ((t (:foreground "LightSalmon"))))
(org-hide ((t (:foreground "black"))))
(org-latex-and-export-specials ((t (:foreground "burlywood"))))
(org-level-1 ((t (:foreground "Red"))))
(org-level-2 ((t (:foreground "White"))))
(org-level-3 ((t (:foreground "RoyalBlue"))))
(org-level-4 ((t (:foreground "DeepPink4"))))
(org-level-5 ((t (:foreground "Blue3"))))
(org-level-6 ((t (:foreground "Gold"))))
(org-level-7 ((t (:foreground "LightSteelBlue"))))
(org-level-8 ((t (:foreground "Sienna"))))
(org-link ((t (:foreground "Cyan" :underline t))))
(org-meta-line ((t (:foreground "DeepPink4"))))
(org-mode-line-clock ((t (:box (:line-width -1 :style released-button) :foreground "black" :background "grey75"))))
(org-property-value ((t (nil))))
(org-quote ((t (:foreground "grey70"))))
(org-scheduled ((t (:foreground "PaleGreen"))))
(org-scheduled-previously ((t (:foreground "chocolate1"))))
(org-scheduled-today ((t (:foreground "PaleGreen"))))
(org-sexp-date ((t (:foreground "Cyan"))))
(org-special-keyword ((t (:foreground "LightSalmon"))))
(org-table ((t (:foreground "LightSkyBlue"))))
(org-tag ((t (:bold t :weight bold))))
(org-target ((t (:underline t))))
(org-time-grid ((t (:foreground "LightGoldenrod"))))
(org-todo ((t (:bold t :foreground "Pink" :weight bold))))
(org-upcoming-deadline ((t (:foreground "chocolate1"))))
(org-verbatim ((t (:foreground "grey70"))))
(org-verse ((t (:foreground "grey70"))))
(org-warning ((t (:bold t :weight bold :foreground "Pink"))))
(outline-1 ((t (:foreground "Red"))))
(outline-2 ((t (:foreground "White"))))
(outline-3 ((t (:foreground "RoyalBlue"))))
(outline-4 ((t (:foreground "DeepPink4"))))
(outline-5 ((t (:foreground "Blue3"))))
(outline-6 ((t (:foreground "Gold"))))
(outline-7 ((t (:foreground "LightSteelBlue"))))
(outline-8 ((t (:foreground "Sienna"))))
(popup-face ((t (:background "lightgray" :foreground "black"))))
(popup-isearch-match ((t (:background "sky blue"))))
(popup-menu-face ((t (:background "lightgray" :foreground "black"))))
(popup-menu-selection-face ((t (:background "steelblue" :foreground "white"))))
(popup-scroll-bar-background-face ((t (:background "gray"))))
(popup-scroll-bar-foreground-face ((t (:background "black"))))
(popup-tip-face ((t (:background "khaki1" :foreground "black"))))
(pulse-highlight-face ((t (:background "#AAAA33"))))
(pulse-highlight-start-face ((t (:background "#AAAA33"))))
(query-replace ((t (:foreground "brown4" :background "palevioletred2"))))
(region ((t (:background "LightCoral"))))
(rng-error ((t (:bold t :weight bold :foreground "Pink"))))
(rngalt-validation-header-bottom ((t (:background "RGB:87/CE/FA" :foreground "white"))))
(rngalt-validation-header-top ((t (:background "white" :foreground "RGB:87/CE/FA"))))
(scroll-bar ((t (nil))))
(secondary-selection ((t (:background "#300020"))))
(semantic-highlight-edits-face ((t (:background "gray20"))))
(semantic-highlight-func-current-tag-face ((t (:background "gray20"))))
(semantic-unmatched-syntax-face ((t (:underline "red"))))
(senator-intangible-face ((t (:foreground "gray75"))))
(senator-momentary-highlight-face ((t (:background "gray30"))))
(senator-read-only-face ((t (:background "#664444"))))
(sgml-namespace ((t (:foreground "LightSteelBlue"))))
(shadow ((t (:foreground "grey70"))))
(show-paren-match ((t (:background "gray10"))))
(show-paren-mismatch ((t (:background "purple" :foreground "white"))))
(sldb-catch-tag-face ((t (nil))))
(sldb-condition-face ((t (nil))))
(sldb-detailed-frame-line-face ((t (nil))))
(sldb-frame-label-face ((t (nil))))
(sldb-frame-line-face ((t (nil))))
(sldb-local-name-face ((t (nil))))
(sldb-local-value-face ((t (nil))))
(sldb-reference-face ((t (:underline t))))
(sldb-restart-face ((t (nil))))
(sldb-restart-number-face ((t (:bold t :weight bold))))
(sldb-restart-type-face ((t (:foreground "RoyalBlue"))))
(sldb-section-face ((t (nil))))
(sldb-topline-face ((t (nil))))
(slime-error-face ((t (:underline "red"))))
(slime-highlight-edits-face ((t (:background "dimgray"))))
(slime-highlight-face ((t (:background "darkolivegreen" :underline nil))))
(slime-inspector-action-face ((t (:bold t :weight bold :foreground "Pink"))))
(slime-inspector-label-face ((t (:foreground "Gold"))))
(slime-inspector-topline-face ((t (nil))))
(slime-inspector-type-face ((t (:foreground "Blue3"))))
(slime-inspector-value-face ((t (:foreground "LightSteelBlue"))))
(slime-note-face ((t (:underline "light goldenrod"))))
(slime-reader-conditional-face ((t (:foreground "DeepPink4"))))
(slime-repl-input-face ((t (:bold t :weight bold))))
(slime-repl-inputed-output-face ((t (:foreground "Red"))))
(slime-repl-output-face ((t (:foreground "Sienna"))))
(slime-repl-output-mouseover-face ((t (:foreground "Red" :box (:line-width 1 :color "black" :style released-button)))))
(slime-repl-prompt-face ((t (:foreground "RoyalBlue"))))
(slime-repl-result-face ((t (nil))))
(slime-style-warning-face ((t (:underline "gold"))))
(slime-warning-face ((t (:underline "coral"))))
(speedbar-button-face ((t (:foreground "green3"))))
(speedbar-directory-face ((t (:foreground "light blue"))))
(speedbar-file-face ((t (:foreground "cyan"))))
(speedbar-highlight-face ((t (:background "sea green"))))
(speedbar-selected-face ((t (:foreground "red" :underline t))))
(speedbar-separator-face ((t (:background "blue" :foreground "white" :overline "gray"))))
(speedbar-tag-face ((t (:foreground "yellow"))))
(todo-list-complete-face ((t (:foreground "gray22"))))
(todo-list-four-face ((t (:foreground "LightSteelBlue1"))))
(todo-list-one-face ((t (:foreground "IndianRed1"))))
(todo-list-three-face ((t (:foreground "DarkOrange2"))))
(todo-list-two-face ((t (:foreground "CadetBlue2"))))
(todo-list-zero-face ((t (:italic t :foreground "white" :slant italic))))
(tool-bar ((t (:background "grey75" :foreground "black" :box (:line-width 1 :style released-button)))))
(tooltip ((t (:family "Sans Serif" :background "lightyellow" :foreground "black"))))
(trailing-whitespace ((t (:background "red1"))))
(underline ((t (:underline t))))
(variable-pitch ((t (:family "Sans Serif"))))
(vertical-border ((t (nil))))
(w3m-anchor ((t (:foreground "cyan"))))
(w3m-arrived-anchor ((t (:foreground "LightSkyBlue"))))
(w3m-bold ((t (:bold t :weight bold))))
(w3m-current-anchor ((t (:bold t :underline t :weight bold))))
(w3m-form-button ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
(w3m-form-button-mouse ((t (:background "DarkSeaGreen1" :foreground "black" :box (:line-width 2 :style released-button)))))
(w3m-form-button-pressed ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
(w3m-header-line-location-content ((t (:background "Gray20" :foreground "LightGoldenrod"))))
(w3m-header-line-location-title ((t (:background "Gray20" :foreground "Cyan"))))
(w3m-history-current-url ((t (:background "#300020" :foreground "LightSkyBlue"))))
(w3m-image ((t (:foreground "PaleGreen"))))
(w3m-image-anchor ((t (:background "dark green"))))
(w3m-insert ((t (:foreground "orchid"))))
(w3m-italic ((t (:italic t :slant italic))))
(w3m-strike-through ((t (:strike-through t))))
(w3m-tab-background ((t (:background "LightSteelBlue" :foreground "black"))))
(w3m-tab-mouse ((t (:background "Gray75" :foreground "white" :box (:line-width -1 :style released-button)))))
(w3m-tab-selected ((t (:background "Gray90" :foreground "black" :box (:line-width -1 :style released-button)))))
(w3m-tab-selected-background ((t (:background "LightSteelBlue" :foreground "black"))))
(w3m-tab-selected-retrieving ((t (:background "Gray90" :foreground "red" :box (:line-width -1 :style released-button)))))
(w3m-tab-unselected ((t (:background "Gray70" :foreground "Gray20" :box (:line-width -1 :style released-button)))))
(w3m-tab-unselected-retrieving ((t (:background "Gray70" :foreground "OrangeRed" :box (:line-width -1 :style released-button)))))
(w3m-tab-unselected-unseen ((t (:background "Gray70" :foreground "Gray20" :box (:line-width -1 :style released-button)))))
(w3m-underline ((t (:underline t))))
(web-vcs-gold ((t (:background "gold" :foreground "black"))))
(web-vcs-green ((t (:background "#8f6" :foreground "black"))))
(web-vcs-mode-line ((t (:background "OrangeRed" :foreground "black"))))
(web-vcs-mode-line-inactive ((t (:background "Orange" :foreground "black"))))
(web-vcs-pink ((t (:background "pink" :foreground "black"))))
(web-vcs-red ((t (:background "#f86" :foreground "black"))))
(web-vcs-yellow ((t (:background "yellow" :foreground "black"))))
(which-func ((t (:foreground "Blue1"))))
(widget-button ((t (:bold t :weight bold))))
(widget-button-pressed ((t (:foreground "red1"))))
(widget-documentation ((t (:foreground "lime green"))))
(widget-field ((t (:background "dim gray"))))
(widget-inactive ((t (:foreground "grey70"))))
(widget-single-line-field ((t (:background "dim gray"))))
(window-number-face ((t (:foreground "red")))))))
(add-to-list 'color-themes '(color-theme-black-purple "black-purple" "Anonymous"))
(provide 'color-theme-black-purple)