From 8f58ffb739f80bca1f08dd46b264c7fc5c59c084 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Olivier=20T=C3=A9tard?= <otd@otd.amossys.fr>
Date: Mon, 25 May 2009 10:16:43 +0200
Subject: [PATCH] =?utf8?q?emacs/themes.el:=20ajout=20du=20fichier=20de=20t?=
 =?utf8?q?h=C3=A8mes?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 emacs/themes.el | 79 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 79 insertions(+)
 create mode 100644 emacs/themes.el

diff --git a/emacs/themes.el b/emacs/themes.el
new file mode 100644
index 0000000..660a9ec
--- /dev/null
+++ b/emacs/themes.el
@@ -0,0 +1,79 @@
+;;; Color theme based on Tango Palette. Created by danranx@gmail.com
+(defun color-theme-tango ()
+  "A color theme based on Tango Palette."
+  (interactive)
+  (color-theme-install
+   '(color-theme-tango
+     ((background-color . "#2e3436")
+      (background-mode . dark)
+      (border-color . "#888a85")
+      (cursor-color . "#fce94f")
+      (foreground-color . "#eeeeec")
+      (mouse-color . "#8ae234"))
+     ((help-highlight-face . underline)
+      (ibuffer-dired-buffer-face . font-lock-function-name-face)
+      (ibuffer-help-buffer-face . font-lock-comment-face)
+      (ibuffer-hidden-buffer-face . font-lock-warning-face)
+      (ibuffer-occur-match-face . font-lock-warning-face)
+      (ibuffer-read-only-buffer-face . font-lock-type-face)
+      (ibuffer-special-buffer-face . font-lock-keyword-face)
+      (ibuffer-title-face . font-lock-type-face))
+     (border ((t (:background "#888a85"))))
+     (fringe ((t (:background "grey10"))))
+     (mode-line ((t (:foreground "#eeeeec" :background "#555753"))))
+     (region ((t (:background "#555753"))))
+     (font-lock-builtin-face ((t (:foreground "#729fcf"))))
+     (font-lock-comment-face ((t (:foreground "#888a85"))))
+     (font-lock-constant-face ((t (:foreground "#8ae234"))))
+     (font-lock-doc-face ((t (:foreground "#888a85"))))
+     (font-lock-keyword-face ((t (:foreground "#729fcf" :bold t))))
+     (font-lock-string-face ((t (:foreground "#ad7fa8" :italic t))))
+     (font-lock-type-face ((t (:foreground "#8ae234" :bold t))))
+     (font-lock-variable-name-face ((t (:foreground "#eeeeec"))))
+     (font-lock-warning-face ((t (:bold t :foreground "#f57900"))))
+     (font-lock-function-name-face ((t (:foreground "#edd400" :bold t :italic t))))
+     (comint-highlight-input ((t (:italic t :bold t))))
+     (comint-highlight-prompt ((t (:foreground "#8ae234"))))
+     (isearch ((t (:background "#f57900" :foreground "#2e3436"))))
+     (isearch-lazy-highlight-face ((t (:foreground "#2e3436" :background "#e9b96e"))))
+     (show-paren-match-face ((t (:foreground "#2e3436" :background "#73d216"))))
+     (show-paren-mismatch-face ((t (:background "#ad7fa8" :foreground "#2e3436"))))
+     (minibuffer-prompt ((t (:foreground "#729fcf" :bold t))))
+     (info-xref ((t (:foreground "#729fcf"))))
+     (info-xref-visited ((t (:foreground "#ad7fa8"))))
+     )))
+
+(defun color-theme-djcb-dark ()
+  "dark color theme created by djcb, Jan. 2009."
+  (interactive)
+  (color-theme-install
+   '(color-theme-djcb-dark
+     ((foreground-color . "#a9eadf")
+      (background-color . "black") 
+      (background-mode . dark))
+     (bold ((t (:bold t))))
+     (bold-italic ((t (:italic t :bold t))))
+     (default ((t (nil))))
+     
+     (font-lock-builtin-face ((t (:italic t :foreground "#a96da0"))))
+     (font-lock-comment-face ((t (:italic t :foreground "#bbbbbb"))))
+     (font-lock-comment-delimiter-face ((t (:foreground "#666666"))))
+     (font-lock-constant-face ((t (:bold t :foreground "#197b6e"))))
+     (font-lock-doc-string-face ((t (:foreground "#3041c4"))))
+     (font-lock-doc-face ((t (:foreground "gray"))))
+     (font-lock-reference-face ((t (:foreground "white"))))
+     (font-lock-function-name-face ((t (:foreground "#356da0"))))
+     (font-lock-keyword-face ((t (:bold t :foreground "#bcf0f1"))))
+     (font-lock-preprocessor-face ((t (:foreground "#e3ea94"))))
+     (font-lock-string-face ((t (:foreground "#ffffff"))))
+     (font-lock-type-face ((t (:bold t :foreground "#364498"))))
+     (font-lock-variable-name-face ((t (:foreground "#7685de"))))
+     (font-lock-warning-face ((t (:bold t :italic nil :underline nil 
+                                        :foreground "yellow"))))
+     (hl-line ((t (:background "#112233"))))
+     (mode-line ((t (:foreground "#ffffff" :background "#333333"))))
+     (region ((t (:foreground nil :background "#555555"))))
+     (show-paren-match-face ((t (:bold t :foreground "#ffffff" 
+                                       :background "#050505")))))))
+
+(provide 'themes)
-- 
2.30.2