From 2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb Mon Sep 17 00:00:00 2001 From: Gregor Kleen Date: Thu, 5 Nov 2015 23:30:50 +0000 Subject: *poke* --- .emacs | 20 ++++++++++++-------- 1 file changed, 12 insertions(+), 8 deletions(-) (limited to '.emacs') diff --git a/.emacs b/.emacs index 93546cb..cead1f1 100644 --- a/.emacs +++ b/.emacs @@ -42,13 +42,24 @@ Return a list of installed packages or nil for every skipped package." (require 'evil) (evil-mode 1) +(defun customize-faces () + (custom-set-faces + '(font-lock-type-face ((t (:foreground "PaleGreen" :weight bold)))) + '(font-lock-function-face ((t (:foreground "LightSkyBlue" :weight bold)))) + ) + ) + (require 'color-theme) (color-theme-initialize) +(customize-faces) (if (daemonp) (add-hook 'after-make-frame-functions (lambda (frame) (with-selected-frame frame - (color-theme-ld-dark)))) + (progn + (color-theme-ld-dark) + (customize-faces) + )))) (color-theme-ld-dark) ) @@ -71,12 +82,5 @@ Return a list of installed packages or nil for every skipped package." '(progn (define-key haskell-mode-map (kbd "C-,") 'haskell-move-nested-lift) (define-key haskell-mode-map (kbd "C-.") 'haskell-move-nested-right) - (setq haskell-font-lock-symbols nil) ) ) -(add-hook 'haskell-mode-hook - (custom-set-faces - '(font-lock-type-face ((t (:foreground "PaleGreen" :weight bold)))) - '(font-lock-function-face ((t (:foreground "LightSkyBlue" :weight bold)))) - ) - ) -- cgit v1.2.3