Skip to content

Instantly share code, notes, and snippets.

@AlejandroCatalina

AlejandroCatalina/github-theme.el

Created November 9, 2016 19:49
Show Gist options
  • Save AlejandroCatalina/9874eb85b1e7b81af7851c69cc4925f9 to your computer and use it in GitHub Desktop.
Save AlejandroCatalina/9874eb85b1e7b81af7851c69cc4925f9 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
github-theme.el
;;; github-theme.el --- Github color theme for GNU Emacs 24
;; Copyright (C) 2011 Dudley Flanders <dudley@steambone.org>
;; Author: Dudley Flanders
;; Adapted-By: Yesudeep Mangalapilly
;; Adapted-By: Joshua Timberman
;; Adapted-By: Alejandro Catalina
;; Keywords: github color theme
;; URL original: http://github.com/dudleyf/color-theme-github
;; Version: 0.0.3
;; Package-Requires: ((color-theme "6.6.1"))
;; This file is not a part of GNU Emacs.
;;; License:
;; This is free software; you can redistribute it and/or modify it under
;; the terms of the GNU General Public License as published by the Free
;; Software Foundation; either version 2, or (at your option) any later
;; version.
;;
;; This is distributed in the hope that it will be useful, but WITHOUT
;; ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
;; for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs; see the file COPYING. If not, write to the
;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
;; MA 02111-1307, USA.
;;; Code:
(deftheme github "Port of Github Theme for Emacs 25")
(let ((*background-color* "#f8f8ff")
(*background-mode* 'light)
(*border-color* "black")
(*cursor-color* "#000000")
(*foreground-color* "#000000")
(*mouse-color* "#bcd5fa"))
(custom-theme-set-faces
'github
`(default ((t (:stipple nil :background "#f8f8ff" :foreground "#000000" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal))))
`(css-property ((t (:foreground "#0086b3"))))
`(css-selector ((t (:foreground "#990000"))))
`(cursor ((t (:background "#a7a7a7"))))
`(ecb-default-general-face ((t (:height 0.9))))
`(ecb-default-highlight-face ((t (:background "#bcd5fa" :foreground "#000000"))))
`(ecb-directories-general-face ((t (:bold t :weight bold))))
`(ecb-source-in-directories-buffer-face ((t (:foreground "#445588"))))
`(erb-comment-delim-face ((t (:italic t :bold t :slant italic :foreground "#999988" :weight bold))))
`(erb-comment-face ((t (:bold t :background "#eeeeee" :foreground "#999988" :weight bold))))
`(erb-delim-face ((t (:bold t :weight bold))))
`(erb-exec-delim-face ((t (:bold t :weight bold))))
`(erb-exec-face ((t (:background "#eeeeee"))))
`(erb-face ((t (:background "#eeeeee"))))
`(erb-out-delim-face ((t (:bold t :foreground "#445588" :weight bold))))
`(erb-out-face ((t (:background "#eeeeee"))))
`(font-lock-builtin-face ((t (nil))))
`(font-lock-comment-delimiter-face ((t (:italic t :slant italic :foreground "#999988"))))
`(font-lock-comment-face ((t (:italic t :foreground "#999988" :slant italic))))
`(font-lock-constant-face ((t (:foreground "#990073"))))
`(font-lock-doc-face ((t (:foreground "#dd1144"))))
`(font-lock-function-name-face ((t (:foreground "#795da3")))) ;; #990000
`(font-lock-keyword-face ((t (:bold t :weight bold :foreground "#a71d5d"))))
`(font-lock-negation-char-face ((t (nil))))
`(font-lock-reference-face ((t (nil))))
`(font-lock-regexp-grouping-backslash ((t (:foreground "#0086b3")))) ;; "#009926"
`(font-lock-regexp-grouping-construct ((t (:foreground "#0086b3")))) ;; "#009926"
`(font-lock-string-face ((t (:foreground "#183691")))) ;; #dd1144
`(font-lock-type-face ((t (:foreground "#445588"))))
`(font-lock-variable-name-face ((t (:foreground "#0086b3"))))
`(highlight ((t (:background "#acc3e6"))))
`(link ((t (:foreground "blue1" :underline t))))
`(link-visited ((t (:underline t :foreground "magenta4"))))
`(minibuffer-prompt ((t (:foreground "#445588"))))
`(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button) :height 0.85))))
`(mouse ((t (:background "#bcd5fa"))))
`(quack-about-face ((t (:family "Helvetica"))))
`(quack-about-title-face ((t (:bold t :foreground "#008000" :weight bold :height 2.0 :family "Helvetica"))))
`(quack-banner-face ((t (:family "Helvetica"))))
`(quack-pltfile-dir-face ((t (:bold t :background "gray33" :foreground "white" :weight bold :height 1.2 :family "Helvetica"))))
`(quack-pltfile-file-face ((t (:bold t :background "gray66" :foreground "black" :weight bold :height 1.2 :family "Helvetica"))))
`(quack-pltfile-prologue-face ((t (:background "gray66" :foreground "black"))))
`(quack-pltish-class-defn-face ((t (:bold t :weight bold :foreground "purple3"))))
`(quack-pltish-comment-face ((t (:foreground "cyan4"))))
`(quack-pltish-defn-face ((t (:bold t :foreground "blue3" :weight bold))))
`(quack-pltish-keyword-face ((t (:bold t :weight bold))))
`(quack-pltish-module-defn-face ((t (:bold t :weight bold :foreground "purple3"))))
`(quack-pltish-paren-face ((t (:foreground "red3"))))
`(quack-pltish-selfeval-face ((t (:foreground "green4"))))
`(quack-smallprint-face ((t (:height 0.8 :family "Courier"))))
`(quack-threesemi-h1-face ((t (:bold t :weight bold :height 1.4 :family "Helvetica"))))
`(quack-threesemi-h2-face ((t (:bold t :weight bold :height 1.2 :family "Helvetica"))))
`(quack-threesemi-h3-face ((t (:bold t :weight bold :family "Helvetica"))))
`(quack-threesemi-semi-face ((t (:background "#c0ffff" :foreground "#a0ffff"))))
`(quack-threesemi-text-face ((t (:background "#c0ffff" :foreground "cyan4"))))
`(region ((t (:background "#bcd5fa"))))
`(show-paren-match ((t (:background "#fff6a9"))))
`(show-paren-mismatch ((t (:background "#dd1144"))))))
(provide-theme 'github)
;;; github-theme.el ends here
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment