diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2015-11-05 23:30:50 +0000 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2015-11-05 23:30:50 +0000 |
commit | 2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb (patch) | |
tree | c3c54ff3285600f519e36c5c9fab2db490a77f07 /.emacs | |
parent | 7f93a971c3d9fe4201c48e47c008c1618ca7518d (diff) | |
download | dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar.gz dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar.bz2 dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar.xz dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.zip |
*poke*
Diffstat (limited to '.emacs')
-rw-r--r-- | .emacs | 20 |
1 files changed, 12 insertions, 8 deletions
@@ -42,13 +42,24 @@ Return a list of installed packages or nil for every skipped package." | |||
42 | (require 'evil) | 42 | (require 'evil) |
43 | (evil-mode 1) | 43 | (evil-mode 1) |
44 | 44 | ||
45 | (defun customize-faces () | ||
46 | (custom-set-faces | ||
47 | '(font-lock-type-face ((t (:foreground "PaleGreen" :weight bold)))) | ||
48 | '(font-lock-function-face ((t (:foreground "LightSkyBlue" :weight bold)))) | ||
49 | ) | ||
50 | ) | ||
51 | |||
45 | (require 'color-theme) | 52 | (require 'color-theme) |
46 | (color-theme-initialize) | 53 | (color-theme-initialize) |
54 | (customize-faces) | ||
47 | (if (daemonp) | 55 | (if (daemonp) |
48 | (add-hook 'after-make-frame-functions | 56 | (add-hook 'after-make-frame-functions |
49 | (lambda (frame) | 57 | (lambda (frame) |
50 | (with-selected-frame frame | 58 | (with-selected-frame frame |
51 | (color-theme-ld-dark)))) | 59 | (progn |
60 | (color-theme-ld-dark) | ||
61 | (customize-faces) | ||
62 | )))) | ||
52 | (color-theme-ld-dark) | 63 | (color-theme-ld-dark) |
53 | ) | 64 | ) |
54 | 65 | ||
@@ -71,12 +82,5 @@ Return a list of installed packages or nil for every skipped package." | |||
71 | '(progn | 82 | '(progn |
72 | (define-key haskell-mode-map (kbd "C-,") 'haskell-move-nested-lift) | 83 | (define-key haskell-mode-map (kbd "C-,") 'haskell-move-nested-lift) |
73 | (define-key haskell-mode-map (kbd "C-.") 'haskell-move-nested-right) | 84 | (define-key haskell-mode-map (kbd "C-.") 'haskell-move-nested-right) |
74 | (setq haskell-font-lock-symbols nil) | ||
75 | ) | 85 | ) |
76 | ) | 86 | ) |
77 | (add-hook 'haskell-mode-hook | ||
78 | (custom-set-faces | ||
79 | '(font-lock-type-face ((t (:foreground "PaleGreen" :weight bold)))) | ||
80 | '(font-lock-function-face ((t (:foreground "LightSkyBlue" :weight bold)))) | ||
81 | ) | ||
82 | ) | ||