Initial commit

This commit is contained in:
Tom Willemsen 2012-02-23 09:36:39 +01:00
commit 9aa83495b1
4 changed files with 98 additions and 0 deletions

1
.gitignore vendored Normal file
View file

@ -0,0 +1 @@
*.elc

11
jedi-theme.el Normal file
View file

@ -0,0 +1,11 @@
(require 'sw-theme)
(deftheme jedi
"Created 2012-02-22")
(custom-theme-set-faces
'jedi
'(default ((t (:background "#ffe7ba" :foreground "#000000")))))
(sw-theme-set-faces 'jedi)
(provide-theme 'jedi)

11
sith-theme.el Normal file
View file

@ -0,0 +1,11 @@
(require 'sw-theme)
(deftheme sith
"Created 2012-02-22")
(custom-theme-set-faces
'sith
'(default ((t (:background "#000000" :foreground "#ffffff")))))
(sw-theme-set-faces 'sith)
(provide-theme 'sith)

75
sw-theme.el Normal file
View file

@ -0,0 +1,75 @@
(defun sw-theme-set-faces (theme)
(custom-theme-set-faces
theme
'(font-lock-builtin-face ((((background light))
(:foreground "#00aa00"))
(((background dark))
(:foreground "#ff0000"))))
'(font-lock-comment-delimiter-face ((default
(:weight bold))
(((background light))
(:foreground "#404040"))
(((background dark))
(:foreground "#888888"))))
'(font-lock-comment-face ((((background light))
(:foreground "#808080"))
(((background dark))
(:foreground "#aaaaaa"))))
'(font-lock-function-name-face ((default
(:weight bold))
(((background light))
(:foreground "#00aa00"))
(((background dark))
(:foreground "#ff0000"))))
'(font-lock-keyword-face ((((background light))
(:foreground "#1e90ff"))
(((background dark))
(:foreground "#ffa500"))))
'(font-lock-type-face ((default
(:weight bold))
(((background light))
(:foreground "#800080"))
(((background dark))
(:foreground "#ffff00"))))
'(font-lock-variable-name-face ((((background light))
(:foreground "#800080"))
(((background dark))
(:foreground "#ffff00"))))
'(fringe ((((background light))
(:background "#ffe7ba" :foreground "#000000"))
(((background dark))
(:background "#000000" :foreground "#ffffff"))))
'(mode-line ((((background light))
(:background "#ffe4b5" :foreground "#000000"
:box (:line-width 1 :color "#00aa00")))
(((background dark))
(:background "#000000" :foreground "#ffffff"
:box (:line-width 1 :color "#ff0000")))))
'(mode-line-buffer-id ((default
(:weight bold))
(((background light))
(:foreground "#aa00aa"))
(((background dark))
(:foreground "#ffff00"))))
'(mode-line-inactive ((((background light))
(:background "#ffe4b5" :foreground "#808080"
:box (:line-width 1 :color "#004000")))
(((background dark))
(:background "#000000" :foreground "#aaaaaa"
:box (:line-width 1 :color "#500000")))))))
(defun turn-on-jedi ()
(disable-theme 'sith)
(enable-theme 'jedi))
(defun turn-on-sith ()
(disable-theme 'jedi)
(enable-theme 'sith))
(defun sw-theme-switch ()
(interactive)
(if (eq (car custom-enabled-themes) 'jedi)
(turn-on-sith)
(turn-on-jedi)))
(provide 'sw-theme)