emacs: externalized custom file, use color-theme

1 files changed, 266 insertions, 0 deletions

diff --git a/emacs.d/emacs-custom.el b/emacs.d/emacs-custom.el
new file mode 100644
index 0000000..1e73417
--- /dev/null
+++ b/emacs.d/emacs-custom.el
@@ -0,0 +1,266 @@
+;;; emacs-custom.el --- custom emacs settings
+;; Author:  <alexander@sulfrian.net>
+
+(custom-set-variables
+  ;; custom-set-variables 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.
+ '(Buffer-menu-use-frame-buffer-list nil)
+ '(LaTeX-command "TEXINPUTS=\"texmf/:${TEXINPUT}\" pdflatex")
+ '(TeX-PDF-mode t)
+ '(TeX-command "tex")
+ '(TeX-command-list (quote (("TeX" "%(PDF)%(tex) %`%S%(PDFout)%(mode)%' %t" TeX-run-TeX nil (plain-tex-mode texinfo-mode ams-tex-mode) :help "Run plain TeX") ("LaTeX" "%`%l%(mode)%' %t" TeX-run-TeX nil (latex-mode doctex-mode) :help "Run LaTeX") ("Makeinfo" "makeinfo %t" TeX-run-compile nil (texinfo-mode) :help "Run Makeinfo with Info output") ("Makeinfo HTML" "makeinfo --html %t" TeX-run-compile nil (texinfo-mode) :help "Run Makeinfo with HTML output") ("AmSTeX" "%(PDF)amstex %`%S%(PDFout)%(mode)%' %t" TeX-run-TeX nil (ams-tex-mode) :help "Run AMSTeX") ("ConTeXt" "texexec --once --texutil %(execopts)%t" TeX-run-TeX nil (context-mode) :help "Run ConTeXt once") ("ConTeXt Full" "texexec %(execopts)%t" TeX-run-TeX nil (context-mode) :help "Run ConTeXt until completion") ("BibTeX" "bibtex %s" TeX-run-BibTeX nil t :help "Run BibTeX") ("View" "%V" TeX-run-discard-or-function t t :help "Run Viewer") ("Print" "%p" TeX-run-command t t :help "Print the file") ("Queue" "%q" TeX-run-background nil t :help "View the printer queue" :visible TeX-queue-command) ("File" "%(o?)dvips %d -o %f " TeX-run-command t t :help "Generate PostScript file") ("Index" "makeindex %s" TeX-run-command nil t :help "Create index file") ("Check" "lacheck %s" TeX-run-compile nil (latex-mode) :help "Check LaTeX file for correctness") ("Spell" "(TeX-ispell-document \"\")" TeX-run-function nil t :help "Spell-check the document") ("Clean" "TeX-clean" TeX-run-function nil t :help "Delete generated intermediate files") ("Clean All" "(TeX-clean t)" TeX-run-function nil t :help "Delete generated intermediate and output files") ("Other" "" TeX-run-command t t :help "Run an arbitrary command"))))
+ '(abbrev-mode t)
+ '(ac-auto-start t)
+ '(ac-dwim t)
+ '(ac-modes (quote (emacs-lisp-mode lisp-interaction-mode c-mode cc-mode c++-mode java-mode perl-mode cperl-mode python-mode ruby-mode ecmascript-mode javascript-mode js2-mode php-mode css-mode makefile-mode sh-mode fortran-mode f90-mode ada-mode xml-mode sgml-mode delphi-mode)))
+ '(all-christian-calendar-holidays t)
+ '(auto-compression-mode t nil (jka-compr))
+ '(backward-delete-char-untabify-method nil)
+ '(browse-kill-ring-depropertize nil)
+ '(browse-kill-ring-display-duplicates nil)
+ '(browse-kill-ring-highlight-current-entry nil)
+ '(browse-kill-ring-highlight-inserted-item nil)
+ '(bubblet-high-score 286 t)
+ '(bubblet-high-stats (quote (47 131)) t)
+ '(bubblet-num-games 1 t)
+ '(bubblet-total-score 286 t)
+ '(bubblet-total-stats (quote (47 131)) t)
+ '(c-basic-offset 4)
+ '(c-syntactic-indentation t)
+ '(c-syntactic-indentation-in-macros nil)
+ '(c-tab-always-indent nil)
+ '(calendar-christian-all-holidays-flag t)
+ '(calendar-mark-holidays-flag t)
+ '(calendar-view-holidays-initially-flag t)
+ '(calendar-week-start-day 1)
+ '(case-fold-search t)
+ '(column-number-mode t)
+ '(comment-empty-lines (quote (quote eol)))
+ '(comment-style (quote indent))
+ '(compilation-skip-threshold 2)
+ '(confirm-kill-emacs (quote y-or-n-p))
+ '(cua-delete-selection nil)
+ '(cua-mode t nil (cua-base))
+ '(cua-rectangle-mark-key [134217760])
+ '(cua-remap-control-v nil)
+ '(cua-remap-control-z nil)
+ '(curchg-default-cursor-color "white")
+ '(curchg-overwrite/read-only-cursor-type (quote hollow))
+ '(current-language-environment "English")
+ '(delicious-api-password "tH#eowU4")
+ '(delicious-api-user "aleximux")
+ '(delphi-case-label-indent 2)
+ '(delphi-indent-level 2)
+ '(delphi-tab-always-indents nil)
+ '(dir-locals-mode t)
+ '(dired-sort-menu-saved-config (quote ((dired-actual-switches . "-al"))))
+ '(display-time-24hr-format t)
+ '(display-time-day-and-date t)
+ '(display-time-interval 60)
+ '(display-time-mail-file (quote none))
+ '(display-time-string-forms (quote ((if (and (not display-time-format) display-time-day-and-date) (format-time-string "---%a %b %e " now) "") (propertize (format-time-string (or display-time-format (if display-time-24hr-format "%H:%M" "%-I:%M%p")) now) (quote help-echo) (format-time-string "%a %b %e, %Y" now)) load (if mail (concat " " (propertize display-time-mail-string (quote display) (\` (when (and display-time-use-mail-icon (display-graphic-p)) (\,@ display-time-mail-icon) (\,@ (if (and display-time-mail-face (memq (plist-get (cdr display-time-mail-icon) :type) (quote (pbm xbm)))) (let ((bg (face-attribute display-time-mail-face :background))) (if (stringp bg) (list :background bg))))))) (quote face) display-time-mail-face (quote help-echo) "You have new mail; mouse-2: Read mail" (quote mouse-face) (quote mode-line-highlight) (quote local-map) (make-mode-line-mouse-map (quote mouse-2) read-mail-command))) ""))))
+ '(double-mode nil t (double))
+ '(ecb-compilation-buffer-names (quote (("*Calculator*") ("*vc*") ("*vc-diff*") ("*Apropos*") ("*Occur*") ("*shell*") ("\\*[cC]ompilation.*\\*" . t) ("\\*i?grep.*\\*" . t) ("*JDEE Compile Server*") ("*Help*") ("\\*.*[Cc]ompletions\\*" . t) ("*Backtrace*") ("*Compile-log*") ("*bsh*") ("*Messages*"))))
+ '(ecb-compile-window-height 6)
+ '(ecb-compile-window-temporally-enlarge (quote both))
+ '(ecb-compile-window-width (quote frame))
+ '(ecb-directories-menu-user-extension (quote (("Version Control" (ecb-dir-popup-cvs-status "CVS Status") (ecb-dir-popup-cvs-examine "CVS Examine") (ecb-dir-popup-cvs-update "CVS Update")))))
+ '(ecb-history-sort-method nil)
+ '(ecb-layout-name "left7")
+ '(ecb-layout-window-sizes (quote (("left7" (0.21844660194174756 . 0.5873015873015873) (0.21844660194174756 . 0.15873015873015872) (0.21844660194174756 . 0.23809523809523808)))))
+ '(ecb-options-version "2.40")
+ '(ecb-primary-secondary-mouse-buttons (quote mouse-1--mouse-2))
+ '(ecb-process-non-semantic-files t)
+ '(ecb-show-help-format (quote info))
+ '(ecb-source-path (quote (("/" "/") ("/home/alex/" "~/") ("/home/alex/dev" "~/dev"))))
+ '(ecb-stealthy-tasks-delay 0.5)
+ '(ecb-tag-display-function (quote ((default . ecb--semantic-format-tag-uml-prototype))))
+ '(ecb-tip-of-the-day nil)
+ '(ecb-use-speedbar-instead-native-tree-buffer nil)
+ '(ediff-window-setup-function (quote ediff-setup-windows-plain))
+ '(elmo-imap4-default-server "mail.sulfrian.net!")
+ '(elmo-imap4-default-user "alexander@sulfrian.net")
+ '(etags-table-search-up-depth 10)
+ '(fill-individual-varying-indent t)
+ '(flyspell-default-dictionary "english")
+ '(flyspell-delay 1)
+ '(flyspell-duplicate-distance -1)
+ '(flyspell-issue-message-flag nil)
+ '(flyspell-mark-duplications-flag nil)
+ '(flyspell-use-meta-tab t)
+ '(focus-follows-mouse t)
+ '(font-lock-support-mode (quote jit-lock-mode))
+ '(font-use-system-font t)
+ '(frame-background-mode nil)
+ '(fringe-mode nil nil (fringe))
+ '(global-auto-complete-mode t)
+ '(global-hl-line-mode t nil (hl-line))
+ '(gnus-audio-au-player "/usr/bin/aplay")
+ '(gnus-audio-wav-player "/usr/bin/aplay")
+ '(gnus-secondary-select-methods (quote ((nnimap "animux.de" (nnimap-stream ssl) (nnimap-list-pattern "INBOX")))))
+ '(grep-command "grep --color -nH -e ")
+ '(gud-tooltip-mode nil)
+ '(hl-line-face (quote highlight))
+ '(holiday-general-holidays (quote ((holiday-fixed 1 1 "New Year's Day") (holiday-fixed 2 14 "Valentine's Day") (holiday-fixed 4 1 "April Fools' Day") (holiday-float 5 0 2 "Mother's Day") (holiday-fixed 10 31 "Halloween"))))
+ '(ido-everywhere t)
+ '(ido-max-directory-size 600000)
+ '(indent-tabs-mode nil)
+ '(indicate-buffer-boundaries (quote left))
+ '(indicate-empty-lines t)
+ '(inhibit-eol-conversion nil)
+ '(inhibit-startup-screen t)
+ '(inverse-video nil)
+ '(ispell-extra-args nil)
+ '(ispell-program-name "/usr/bin/ispell")
+ '(ispell-silently-savep t)
+ '(ispell-use-framepop-p t)
+ '(jde-run-option-application-args (quote ("10")))
+ '(jit-lock-chunk-size 1024)
+ '(jit-lock-context-time 0.1)
+ '(jit-lock-defer-time 0.1)
+ '(jit-lock-stealth-nice 0.1)
+ '(jit-lock-stealth-time nil)
+ '(linum-format (lambda (line) (propertize (format (let ((w (length (number-to-string (count-lines (point-min) (point-max)))))) (concat " %" (number-to-string w) "d ")) line) (quote face) (quote linum))))
+ '(make-backup-files nil)
+ '(mark-holidays-in-calendar t)
+ '(max-lisp-eval-depth 20000)
+ '(max-specpdl-size 50000)
+ '(mime-view-mailcap-files (quote ("~/.emacs.d/mailcap" "~/.mailcap")))
+ '(mouse-1-click-in-non-selected-windows nil)
+ '(mouse-autoselect-window t)
+ '(mouse-avoidance-mode (quote jump) nil (avoid))
+ '(mouse-sel-mode nil)
+ '(mouse-wheel-follow-mouse nil)
+ '(mouse-wheel-mode t nil (mwheel))
+ '(msb-mode t nil (msb))
+ '(newsticker-url-list-defaults (quote (("Debian Security Advisories" "http://www.debian.org/security/dsa.en.rdf") ("Heise News (german)" "http://www.heise.de/newsticker/heise.rdf"))))
+ '(org-modules (quote (org-bbdb org-bibtex org-gnus org-info org-jsinfo org-irc org-mew org-mhe org-rmail org-vm org-wl org-mouse org-bookmark org-depend org-eval org-man org-screen org-toc)))
+ '(pcomplete-autolist t)
+ '(require-final-newline t)
+ '(ruler-mode-show-tab-stops nil)
+ '(safe-local-variable-values (quote ((flyspell-dict . "german") (ispell-local-dictionary quote german) (ispell-local-dictionary . german) (ispell-current-dictionary . german) (flyspell-mode . t) (self-compile-mode . t) (indent-tabs-mode quote nil) (c-basic-offset 4))))
+ '(savehist-mode t nil (savehist))
+ '(scalable-fonts-allowed t)
+ '(scroll-bar-mode (quote right))
+ '(scroll-conservatively 0)
+ '(scroll-down-aggressively nil)
+ '(scroll-margin 0)
+ '(scroll-preserve-screen-position t)
+ '(scroll-step 0)
+ '(scroll-up-aggressively nil)
+ '(server-mode t)
+ '(show-paren-mode t)
+ '(show-trailing-whitespace t)
+ '(sieve-manage-default-user "alexander@sulfrian.net")
+ '(sml-modeline-borders (quote ("" . " ")))
+ '(sml-modeline-len 12)
+ '(sml-modeline-numbers (quote percentage))
+ '(smooth-scroll-margin 2)
+ '(speedbar-directory-button-trim-method (quote trim))
+ '(speedbar-frame-parameters (quote ((minibuffer) (width . 30) (height . 60) (border-width . 0) (menu-bar-lines . 0) (tool-bar-lines . 0) (unsplittable . t) (left-fringe . 0))))
+ '(speedbar-frame-plist (quote (minibuffer nil width 30 height 60 border-width 0 internal-border-width 0 unsplittable t default-toolbar-visible-p nil has-modeline-p nil menubar-visible-p nil default-gutter-visible-p nil)))
+ '(speedbar-indentation-width 2)
+ '(speedbar-show-unknown-files t)
+ '(speedbar-track-mouse-flag t)
+ '(speedbar-use-images nil)
+ '(speedbar-visiting-tag-hook (quote (speedbar-highlight-one-tag-line speedbar-recenter-to-top)))
+ '(sql-product (quote mysql))
+ '(sql-server "")
+ '(sql-user "")
+ '(standard-indent 4)
+ '(tab-always-indent nil)
+ '(tab-bar-mode -1)
+ '(tab-stop-list (quote (8 16 24 32 40 48 56 64 72 80 88 96 104 112 120)))
+ '(tab-width 4)
+ '(tabkey2-mode nil)
+ '(timeclock-modeline-display t nil (timeclock))
+ '(timeclock-relative nil)
+ '(timeclock-workday 0)
+ '(tls-process-connection-type t)
+ '(tooltip-delay 0.5)
+ '(tooltip-frame-parameters (quote ((name . "tooltip") (internal-border-width . 1) (border-width . 1))))
+ '(tooltip-use-echo-area nil)
+ '(tooltip-x-offset 10)
+ '(tooltip-y-offset 10)
+ '(tramp-mode nil)
+ '(truncate-lines nil)
+ '(truncate-partial-width-windows nil)
+ '(uniquify-buffer-name-style (quote post-forward-angle-brackets) nil (uniquify))
+ '(view-calendar-holidays-initially t)
+ '(view-read-only t)
+ '(visible-bell nil)
+ '(volatile-highlights-mode t)
+ '(whitespace-auto-cleanup nil)
+ '(whitespace-check-ateol-whitespace nil)
+ '(whitespace-check-indent-whitespace nil)
+ '(whitespace-check-leading-whitespace nil)
+ '(whitespace-check-spacetab-whitespace nil)
+ '(whitespace-check-trailing-whitespace nil)
+ '(whitespace-display-in-modeline nil)
+ '(whitespace-display-spaces-in-color t)
+ '(whitespace-global-mode nil)
+ '(whitespace-indent-regexp "^	*\\(    \\)+")
+ '(whitespace-rescan-timer-time 0)
+ '(windmove-wrap-around nil)
+ '(winring-show-names t)
+ '(x-gtk-whole-detached-tool-bar nil)
+ '(x-stretch-cursor nil))
+
+;; (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 (:stipple nil :background "black" :foreground "grey90" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 79 :width normal))))
+;;  '(border ((t (:background "gray50"))))
+;;  '(custom-face-tag ((t (:weight bold))))
+;;  '(custom-group-tag ((((min-colors 88) (class color) (background light)) (:foreground "blue1" :weight bold))))
+;;  '(custom-group-tag-1 ((((min-colors 88) (class color) (background light)) (:foreground "red1" :weight bold :height 1.2))))
+;;  '(custom-variable-tag ((((min-colors 88) (class color) (background light)) (:foreground "blue1" :weight bold))))
+;;  '(fixed-pitch ((t (:family "terminus"))))
+;;  '(font-lock-comment-face ((nil (:foreground "green3"))))
+;;  '(font-lock-constant-face ((nil (:weight bold))))
+;;  '(font-lock-negation-char-face ((t (:foreground "red" :weight bold))))
+;;  '(font-lock-preprocessor-face ((t (:inherit font-lock-builtin-face :foreground "magenta"))))
+;;  '(font-lock-string-face ((nil (:foreground "red2"))))
+;;  '(font-lock-warning-face ((t (:foreground "Red" :weight bold))))
+;;  '(fringe ((((class color) (background light)) (:background "gray80"))))
+;;  '(highlight ((nil (:background "grey10"))))
+;;  '(isearch ((((class color) (min-colors 88) (background dark)) (:background "yellow3" :foreground "black" :weight bold))))
+;;  '(italic ((((supports :underline t)) (:underline t))))
+;;  '(link ((((class color) (min-colors 88) (background dark)) (:foreground "cyan1" :underline t))))
+;;  '(linum ((t (:background "gray10" :foreground "gray50" :box nil :overline nil :underline nil :slant normal :weight normal :height 0.75 :width normal))))
+;;  '(menu ((t nil)))
+;;  '(mode-line ((t (:box (:line-width 1 :color "grey75")))))
+;;  '(mode-line-highlight ((((class color) (min-colors 88)) (:box (:line-width 2 :color "grey40" :style released-button)))))
+;;  '(mode-line-inactive ((default (:inherit mode-line :foreground "gray60")) (nil nil)))
+;;  '(mumamo-background-chunk-major ((((class color) (min-colors 88) (background light)) nil)))
+;;  '(mumamo-background-chunk-submode ((((class color) (min-colors 88) (background light)) nil)))
+;;  '(newsticker-immortal-item-face ((t (:foreground "blue" :slant italic :weight bold))))
+;;  '(newsticker-new-item-face ((t (:weight bold))))
+;;  '(newsticker-obsolete-item-face ((t (:strike-through t :weight bold))))
+;;  '(newsticker-old-item-face ((t (:foreground "red4" :weight bold))))
+;;  '(region ((((class color) (min-colors 88) (background dark)) (:inverse-video t))))
+;;  '(scroll-bar ((t (:background "black" :foreground "gray25"))))
+;;  '(shadow ((((class color grayscale) (min-colors 88) (background dark)) (:foreground "grey50"))))
+;;  '(sml-modeline-end-face ((t (:inherit modeline))))
+;;  '(sml-modeline-vis-face ((t (:background "gray30"))))
+;;  '(tooltip ((t (:background "lightyellow" :foreground "black"))))
+;;  '(variable-pitch ((t (:family "terminus"))))
+;;  '(vhdl-font-lock-attribute-face ((((class color) (background light)) (:foreground "Orchid"))))
+;;  '(vhdl-font-lock-directive-face ((((class color) (background light)) (:foreground "cyan3"))))
+;;  '(vhdl-font-lock-prompt-face ((t (:foreground "Red"))))
+;;  '(vhl/default-face ((t (:inherit secondary-selection :background "darkred"))))
+;;  '(widget-button ((t (:background "grey75" :foreground "black" :box (:line-width 2 :color "grey75" :style released-button)))))
+;;  '(widget-field ((t (:background "gray85" :foreground "black"))))
+;;  '(widget-single-line-field ((t (:background "gray85")))))
+
+;;; emacs-custom.el ends here
+(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.
+ )