gistfile1.el

(color-theme-tangotango)                                                                                                                                                 
(column-number-mode t)                                                                                                                                                   
                                                                                                                                                                         
                                                                                                                                                                         
(require 'auto-complete-config)                                                                                                                                          
(add-to-list 'ac-dictionary-directories "~/.emacs.d/src/ac-dict")                                                                                                        
(ac-config-default)                                                                                                                                                      
(add-to-list 'ac-modes 'erlang-mode)                                                                                                                                     
;; (add-hook 'erlang-mode (λ () (add-to-list 'ac-sources 'ac-source-erlang)))                                                                                            
                                                                                                                                                                         
(add-to-list 'load-path (expand-file-name  "yasnippet"                                                                                                                   
                                (expand-file-name "src" dotfiles-dir)))                                                                                                  
(require 'yasnippet)                                                                                                                                                     
(yas/initialize)                                                                                                                                                         
                                                                                                                                                                         
(yas/load-directory (expand-file-name "snippets" dotfiles-dir))                                                                                                          
                                                                                                                                                                         
;;erlang                                                                                                                                                                 
(setq auto-mode-alist (cons '("\\.app\\'" . erlang-mode) auto-mode-alist))                                                                                               
(add-hook 'erlang-mode-hook 'my-erlang-mode-settings)                                                                                                                    
(add-hook 'erlang-mode-hook 'idle-highlight)  

(defun my-erlang-mode-settings ()                                                                                                                                        
  (setq indent-tabs-mode nil)                                                                                                                                            
  (setq tab-width 4)                                                                                                                                                     
                                                                                                                                                                         
  (defun make-all ()                                                                                                                                                     
    (interactive)                                                                                                                                                        
    (compile "make" t))                                                                                                                                                  
                                                                                                                                                                         
  (defun make-clean ()                                                                                                                                                   
    (interactive)                                                                                                                                                        
    (compile "make clean" t))                                                                                                                                            
                                                                                                                                                                         
  (global-set-key (kbd "<f11>") 'make-all)                                                                                                                               
  (global-set-key (kbd "<f12>") 'make-clean)                                                                                                                             
                                                                                                                                                                         
  )