(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)))))))