themes/color-theme-example.el

   1 (eval-when-compile
   2   (require 'color-theme))
   3
   4 (defun color-theme-example ()
   5   "Example theme. Carbon copy of color-theme-gnome contributed by Jonadab."
   6   (interactive)
   7   (color-theme-install
   8    '(color-theme-example
   9      ((foreground-color . "wheat")
  10       (background-color . "darkslategrey")
  11       (background-mode . dark))
  12      (default ((t (nil))))
  13      (region ((t (:foreground "cyan" :background "dark cyan"))))
  14      (underline ((t (:foreground "yellow" :underline t))))
  15      (modeline ((t (:foreground "dark cyan" :background "wheat"))))
  16      (modeline-buffer-id ((t (:foreground "dark cyan" :background "wheat"))))
  17      (modeline-mousable ((t (:foreground "dark cyan" :background "wheat"))))
  18      (modeline-mousable-minor-mode ((t (:foreground "dark cyan" :background "wheat"))))
  19      (italic ((t (:foreground "dark red" :italic t))))
  20      (bold-italic ((t (:foreground "dark red" :bold t :italic t))))
  21      (font-lock-comment-face ((t (:foreground "Firebrick"))))
  22      (bold ((t (:bold)))))))