From a08232064d08aa77f591fc3b88ac727e605f43e1 Mon Sep 17 00:00:00 2001 From: Andreas Gerler Date: Sun, 10 May 2015 19:26:22 +0200 Subject: [PATCH] adding new color scheme. Signed-off-by: Andreas Gerler --- bba.org | 26 ++++++++++++++++++++++++++ custom.el | 19 +------------------ 2 files changed, 27 insertions(+), 18 deletions(-) diff --git a/bba.org b/bba.org index f91fc756..5e9befe1 100644 --- a/bba.org +++ b/bba.org @@ -1632,6 +1632,32 @@ Some nice functions +#+END_SRC + +*** set theme bba1 + +#+BEGIN_SRC emacs-lisp + (deftheme bba1 "DOCSTRING for bba1") + (custom-theme-set-faces 'bba1 + '(default ((t (:foreground "#07e30d" :background "#282828" )))) + '(cursor ((t (:background "#f09213" )))) + '(fringe ((t (:background "#131313" )))) + '(mode-line ((t (:foreground "#282828" :background "#d96503" )))) + '(region ((t (:background "#7a7674" )))) + '(secondary-selection ((t (:background "#584e47" )))) + '(font-lock-builtin-face ((t (:foreground "#fe8019" )))) + '(font-lock-comment-face ((t (:foreground "#df7114" )))) + '(font-lock-function-name-face ((t (:foreground "#b8bb26" )))) + '(font-lock-keyword-face ((t (:foreground "#fb4934" )))) + '(font-lock-string-face ((t (:foreground "#b8bb26" )))) + '(font-lock-type-face ((t (:foreground "#d3869b" )))) + '(font-lock-constant-face ((t (:foreground "#d3869b" )))) + '(font-lock-variable-name-face ((t (:foreground "#83a598" )))) + '(minibuffer-prompt ((t (:foreground "#b8bb26" :bold t )))) + '(font-lock-warning-face ((t (:foreground "red" :bold t )))) + ) + (provide-theme 'bba1) + #+END_SRC *** load custom file diff --git a/custom.el b/custom.el index 4316c884..1684c444 100644 --- a/custom.el +++ b/custom.el @@ -4,6 +4,7 @@ ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. '(blink-cursor-mode t) + '(custom-safe-themes (quote ("8db4b03b9ae654d4a57804286eb3e332725c84d7cdab38463cb6b97d5762ad26" default))) '(gnuserv-program (concat exec-directory "/gnuserv")) '(history-length 1000) '(magit-commit-signoff t) @@ -15,24 +16,6 @@ '(template-default-directories (quote ("~/.emacs.d/templates/"))) '(toolbar-visible-p nil) '(vc-handled-backends (quote (RCS CVS SVN SCCS Bzr Hg Mtn Arch)))) -(custom-set-faces - ;; custom-set-faces was added by Custom. - ;; If you edit it by hand, you could mess it up, so be careful. - ;; Your init file should contain only one such instance. - ;; If there is more than one, they won't work right. - '(default ((t (:inherit nil :stipple nil :background "black" :foreground "green" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 1 :width normal :foundry "default" :family "default")))) - '(cursor ((t (:foreground "red")))) - '(helm-selection ((((background dark)) (:background "white" :distant-foreground "black")) (((background light)) (:background "#b5ffd1" :distant-foreground "black")))) - '(rainbow-delimiters-depth-1-face ((((background dark)) (:foreground "gray90")))) - '(rainbow-delimiters-depth-2-face ((((background dark)) (:foreground "#ff82ab")))) - '(rainbow-delimiters-depth-3-face ((((background dark)) (:foreground "#66ffff")))) - '(rainbow-delimiters-depth-4-face ((((background dark)) (:foreground "#ffa500")))) - '(rainbow-delimiters-depth-5-face ((((background dark)) (:foreground "white")))) - '(rainbow-delimiters-depth-6-face ((((background dark)) (:foreground "#12bdbd")))) - '(rainbow-delimiters-depth-7-face ((((background dark)) (:foreground "#ff826b")))) - '(rainbow-delimiters-depth-8-face ((((background dark)) (:foreground "#004c00")))) - '(rainbow-delimiters-depth-9-face ((((background dark)) (:foreground "blue")))) - '(tool-bar ((t (:background "Gray80" :size "8"))))) (defcustom sql-mysql-program "/usr/local/mysql/bin/mysql" "*Command to start mysql by mysqlDB." :type 'file -- 2.47.3