Last active

Embed URL

HTTPS clone URL

SSH clone URL

You can clone with HTTPS or SSH.

Download Gist
View bubbleberry-theme.el
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122
(deftheme bubbleberry "Light Table like theme")
 
;; Based on the theme used for LightTable (see: http://www.chris-granger.com/images/lightable/main.png )
 
;; Source: https://gist.github.com/8065710
;; Original Source: https://gist.github.com/3027622
 
(custom-theme-set-variables
'bubbleberry
'(linum-format "%3i")
;; '(fringe-mode 5 nil (fringe))
'(powerline-color1 "#3d3d68")
'(powerline-color2 "#292945")
)
 
(custom-theme-set-faces
'bubbleberry
 
;; basic theming.
'(default ((t (:foreground "#CCCCCC" :background "#202020" ))))
'(region ((t (:background "#151515" ))))
'(cursor ((t (:background "#EEEEEE" ))))
'(fringe ((t (:background "#2F2F2F" :foreground "#FFFFFF" ))))
'(linum ((t (:background "#202020" :foreground "#777777" :box nil :height 100 ))))
'(minibuffer-prompt ((t (:foreground "#9489C4" :weight bold ))))
'(minibuffer-message ((t (:foreground "#FFFFFF" ))))
'(mode-line ((t (:foreground "#BBBBBB" :background "#191919" ))))
'(mode-line-inactive ((t (:foreground "#777777" :background "#303030" :weight light :box nil :inherit (mode-line )))))
 
'(font-lock-keyword-face ((t (:foreground "#B8E9CB"))))
'(font-lock-type-face ((t (:foreground "#C5B3FD"))))
'(font-lock-constant-face ((t (:foreground "#C5B3FD"))))
'(font-lock-variable-name-face ((t (:foreground "#ADCEFD"))))
'(font-lock-builtin-face ((t (:foreground "#6767AE"))))
'(font-lock-string-face ((t (:foreground "#B3DADC"))))
'(font-lock-comment-face ((t (:foreground "#9AACCB"))))
'(font-lock-comment-delimiter-face ((t (:foreground "#9AACCB"))))
'(font-lock-warning-face ((t (:background "#9AACCB"))))
'(font-lock-preprocessor-face ((t (:foreground "#B8E9CB"))))
'(font-lock-reference-face ((t (:foreground "#000000"))))
'(font-lock-negation-char-face ((t (:foreground "#000000"))))
 
'(font-lock-function-name-face ((t (:foreground "#ADCEFD"))))
'(font-lock-doc-face ((t (:foreground "#AAAAAA"))))
'(font-lock-doc-string-face ((t (:foreground "#496B83"))))
 
'(flymake-errline ((t (:foreground "#EE8888" :background nil :underline nil))))
'(flymake-warnline ((t (:foreground "#8888FF" :background "#303030" :underline nil))))
 
;; easy defaults...
'(tooltip ((default nil) (nil nil)))
'(next-error ((t (:inherit (region)))))
'(query-replace ((t (:inherit (isearch)))))
'(button ((t (:inherit (link)))))
'(fixed-pitch ((t (:family "Monospace"))))
'(variable-pitch ((t (:family "Sans Serif"))))
'(escape-glyph ((t (:foreground "#FF6600"))))
'(mode-line-emphasis ((t (:weight bold))))
'(mode-line-highlight ((t (:box nil (t (:inherit (highlight)))))))
 
'(highlight
((((class color) (min-colors 88) (background light)) (:background "#003453"))
(((class color) (min-colors 88) (background dark)) (:background "#003450"))
(((class color) (min-colors 16) (background light)) (:background "#003450"))
(((class color) (min-colors 16) (background dark)) (:background "#004560"))
(((class color) (min-colors 8)) (:foreground "#000000" :background "#00FF00")) (t (:inverse-video t))))
 
'(shadow
((((class color grayscale) (min-colors 88) (background light)) (:foreground "#999999"))
(((class color grayscale) (min-colors 88) (background dark)) (:foreground "#999999"))
(((class color) (min-colors 8) (background light)) (:foreground "#00ff00"))
(((class color) (min-colors 8) (background dark)) (:foreground "#ffff00"))))
 
'(trailing-whitespace
((((class color) (background light)) (:background "#ff0000"))
(((class color) (background dark)) (:background "#ff0000")) (t (:inverse-video t)))))
 
'(link
((((class color) (min-colors 88) (background light)) (:underline t :foreground "#00b7f0"))
(((class color) (background light)) (:underline t :foreground "#0044FF"))
(((class color) (min-colors 88) (background dark)) (:underline t :foreground "#0099aa"))
(((class color) (background dark)) (:underline t :foreground "#0099aa")) (t (:inherit (underline)))))
 
'(link-visited
((default (:inherit (link)))
(((class color) (background light)) (:inherit (link)))
(((class color) (background dark)) (:inherit (link)))))
 
'(header-line
((default (:inherit (mode-line))) (((type tty)) (:underline t :inverse-video nil))
(((class color grayscale) (background light)) (:box nil :foreground "#222222" :background "#bbbbbb"))
(((class color grayscale) (background dark)) (:box nil :foreground "#bbbbbb" :background "#222222"))
(((class mono) (background light)) (:underline t :box nil :inverse-video nil :foreground "#000000" :background "#ffffff"))
(((class mono) (background dark)) (:underline t :box nil :inverse-video nil :foreground "#ffffff" :background "#000000"))))
 
'(isearch
((((class color) (min-colors 88) (background light)) (:foreground "#99ccee" :background "#444444"))
(((class color) (min-colors 88) (background dark)) (:foreground "#bb3311" :background "#444444"))
(((class color) (min-colors 16)) (:foreground "#0088cc" :background "#444444"))
(((class color) (min-colors 8)) (:foreground "#0088cc" :background "#444444")) (t (:inverse-video t))))
 
'(isearch-fail
((((class color) (min-colors 88) (background light)) (:background "#ffaaaa"))
(((class color) (min-colors 88) (background dark)) (:background "#880000"))
(((class color) (min-colors 16)) (:background "#FF0000"))
(((class color) (min-colors 8)) (:background "#FF0000"))
(((class color grayscale)) (:foreground "#888888")) (t (:inverse-video t))))
 
'(lazy-highlight
((((class color) (min-colors 88) (background light)) (:background "#77bbdd"))
(((class color) (min-colors 88) (background dark)) (:background "#77bbdd"))
(((class color) (min-colors 16)) (:background "#4499ee"))
(((class color) (min-colors 8)) (:background "#4499ee")) (t (:underline t))))
 
'(match
((((class color) (min-colors 88) (background light)) (:background "#3388cc"))
(((class color) (min-colors 88) (background dark)) (:background "#3388cc"))
(((class color) (min-colors 8) (background light)) (:foreground "#000000" :background "#FFFF00"))
(((class color) (min-colors 8) (background dark)) (:foreground "#ffffff" :background "#0000FF"))
(((type tty) (class mono)) (:inverse-video t)) (t (:background "#888888"))))
 
(provide-theme 'bubbleberry)

Hey there, thanks for working on this, but you should've just got me to turn this into a proper repo so you could submit a pull request. - Never mind, let's get that going now ok?

See https://github.com/jasonm23/emacs-bubbleberry-theme

I'll make this ready for MELPA/Marmalade today.

BTW, I've just given you push access to the repo, so you'll have co-authorship. Seems only fair after you did all the color calibration work. You won't need to do pull requests, you'll be able to push directly.

For the moment, I think it'll be ok to do push straight to master. For safety you could use feature branches, but I don't think the velocity on this will warrant it.

On Marmalade now

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.