about summary refs log blame commit diff
path: root/init-modes.el
blob: 8ec6309d49d7412f6957f615e39ccf0a4dc2d986 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
                                                       

                           









                                                                  


                                                           


                                                             
 
                                                  
 
                          
                                                      

                             
                 
 


                                      

                                                         
                                
                                            
 
                     


                                           

                                      

                 

                                   
                                              
                                     
 





                                                       

                                              
 



                                       


                                     



                                                                  



                             




                                      

                     
(mapc 'require '(projectile ac-cider-compliment cider))
;; Initializes modes I use.

(add-hook 'prog-mode-hook 'esk-add-watchwords)
(add-hook 'prog-mode-hook 'idle-highlight-mode)

;; Configure markdown-mode
(autoload 'markdown-mode "markdown-mode"
  "Major mode for editing Markdown files" t)
(add-to-list 'auto-mode-alist '("\\.txt\\'" . markdown-mode))
(add-to-list 'auto-mode-alist '("\\.markdown\\'" . markdown-mode))
(add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode))

;; Use auto-complete as completion at point
(defun set-auto-complete-as-completion-at-point-function ()
  (setq completion-at-point-functions '(auto-complete)))

(add-hook 'auto-complete-mode-hook
          'set-auto-complete-as-completion-at-point-function)

;; Configure CIDER (Clojure REPL) and clojure-mode

(defun cider-mode-setup ()
  "Activates paredit, rainbow delimiters and ac-nrepl"
  (ac-cider-compliment-setup)
  (ac-flyspell-workaround)
  (paredit-mode))

(eval-after-load "auto-complete"
  '(add-to-list 'ac-modes cider-mode))

(add-hook 'cider-repl-mode-hook 'cider-mode-setup)
(add-hook 'cider-interaction-mode-hook 'cider-mode-setup)
(eval-after-load "auto-complete"
  '(add-to-list 'ac-modes 'cider-repl-mode))

;; Paredit in clojure
(add-hook 'clojure-mode-hook 'paredit-mode)

;; eldoc in clojure
(add-hook 'cider-interaction-mode-hook
          'cider-turn-on-eldoc-mode)

;; Don't annoy me
(setq cider-hide-special-buffers t)
(setq cider-popup-stacktraces nil)
(setq cider-repl-pop-to-buffer-on-connect nil)
(setq cider-repl-popup-stacktraces t)

;; Enable projectile for all things programming
(add-hook 'prog-mode-hook 'projectile-on)

;; Enable rainbow-delimiters for all things programming
(add-hook 'prog-mode-hook 'rainbow-delimiters-mode)

;; Enable Paredit in Emacs Lisp mode
(add-hook 'emacs-lisp-mode-hook 'paredit-mode)

;; Configure Haskell mode
;; Indentation ...
(add-hook 'haskell-mode-hook 'hi2-mode)

;; Always highlight matching brackets
(show-paren-mode 1)

;; Represent undo-history as an actual tree (visualize with C-x u)
(setq undo-tree-mode-lighter "")
(require 'undo-tree)
(global-undo-tree-mode)

;; Keep track of recent files
(recentf-mode)

;; Easily navigate sillycased words
(global-subword-mode 1)

;; Transparently open compressed files
(auto-compression-mode t)

(provide 'init-modes)