diff -r 2c6b198426df -r 3415a60d5fd0 thirdparty/color-theme-solarized/color-theme-solarized.el --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/thirdparty/color-theme-solarized/color-theme-solarized.el Mon Feb 13 12:46:18 2012 -0600 @@ -0,0 +1,56 @@ +;;; Author: Ethan Schoonover, Solarized; Greg Pfeil, Emacs adaptation +;;; URL: http://ethanschoonover.com/solarized + +;;; This file is not (YET) part of GNU Emacs. + +;;; # Usage + +;;; 1. Install the color-theme package +;;; (http://www.emacswiki.org/cgi-bin/wiki/ColorTheme) +;;; 2. Load this file +;;; 3. M-x color-theme-solarized-[dark|light] + +(require 'solarized-definitions + (let* ((reqname (concat (file-name-directory (or load-file-name + buffer-file-name)) + "solarized-definitions.el")) + (compreqname (concat reqname "c"))) + (if (file-exists-p compreqname) compreqname reqname))) + +(eval-when-compile + (require 'color-theme)) + +;;;###autoload +(defun color-theme-solarized (mode) + "Color theme by Ethan Schoonover, created 2011-03-24. +Ported to Emacs by Greg Pfeil, http://ethanschoonover.com/solarized." + (interactive "Slight or dark? ") + (color-theme-install + (let* ((definitions (solarized-color-definitions mode)) + (faces (first definitions)) + (variables (second definitions))) + (solarized-color-definitions mode) + `(,(intern (concat "color-theme-solarized-" (symbol-name mode))) + ,variables + ,@faces)))) + +;;;###autoload +(defun color-theme-solarized-dark () + (interactive) + (color-theme-solarized 'dark)) + +;;;###autoload +(defun color-theme-solarized-light () + (interactive) + (color-theme-solarized 'light)) + +(add-to-list 'color-themes + `(color-theme-solarized-light + "Solarized Light" + ,solarized-description)) +(add-to-list 'color-themes + `(color-theme-solarized-dark + "Solarized Dark" + ,solarized-description)) + +(provide 'color-theme-solarized)