src.nth.io/

summaryrefslogtreecommitdiff
path: root/thirdparty/color-theme-solarized/color-theme-solarized.el
diff options
context:
space:
mode:
authorLuke Hoersten <[email protected]>2012-02-13 12:46:18 -0600
committerLuke Hoersten <[email protected]>2012-02-13 12:46:18 -0600
commitd0dac239a25e94c904a3cd19eca62f80036bec4f (patch)
treec3a6bf9df8b8a6c2fd7b7edfa269b62835beb843 /thirdparty/color-theme-solarized/color-theme-solarized.el
parentc1a748bd640aeeb1aef0a289f5b05519a46421d8 (diff)
Added solarized color theme.
Diffstat (limited to 'thirdparty/color-theme-solarized/color-theme-solarized.el')
-rw-r--r--thirdparty/color-theme-solarized/color-theme-solarized.el56
1 files changed, 56 insertions, 0 deletions
diff --git a/thirdparty/color-theme-solarized/color-theme-solarized.el b/thirdparty/color-theme-solarized/color-theme-solarized.el
new file mode 100644
index 0000000..e95b782
--- /dev/null
+++ b/thirdparty/color-theme-solarized/color-theme-solarized.el
@@ -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)