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 | |
| parent | 7f93a971c3d9fe4201c48e47c008c1618ca7518d (diff) | |
| download | dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar.gz dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar.bz2 dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.tar.xz dotfiles-2033ba1e4ab7c8ebc91430e1db52977d8f08ebcb.zip | |
*poke*
| -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 | ) | ||
