From e90442449cec3d0965078efa52489e11a7996661 Mon Sep 17 00:00:00 2001 From: ryuslash Date: Sun, 12 Sep 2010 10:12:38 +0200 Subject: Initial commit --- color-theme-example.el | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 color-theme-example.el (limited to 'color-theme-example.el') diff --git a/color-theme-example.el b/color-theme-example.el new file mode 100644 index 0000000..f73b4f6 --- /dev/null +++ b/color-theme-example.el @@ -0,0 +1,22 @@ +(eval-when-compile + (require 'color-theme)) + +(defun color-theme-example () + "Example theme. Carbon copy of color-theme-gnome contributed by Jonadab." + (interactive) + (color-theme-install + '(color-theme-example + ((foreground-color . "wheat") + (background-color . "darkslategrey") + (background-mode . dark)) + (default ((t (nil)))) + (region ((t (:foreground "cyan" :background "dark cyan")))) + (underline ((t (:foreground "yellow" :underline t)))) + (modeline ((t (:foreground "dark cyan" :background "wheat")))) + (modeline-buffer-id ((t (:foreground "dark cyan" :background "wheat")))) + (modeline-mousable ((t (:foreground "dark cyan" :background "wheat")))) + (modeline-mousable-minor-mode ((t (:foreground "dark cyan" :background "wheat")))) + (italic ((t (:foreground "dark red" :italic t)))) + (bold-italic ((t (:foreground "dark red" :bold t :italic t)))) + (font-lock-comment-face ((t (:foreground "Firebrick")))) + (bold ((t (:bold))))))) -- cgit v1.2.3-54-g00ecf