init.el

init.el

(require 'package)
(package-initialize)
(add-to-list 'package-archives '("melpa" . "http://melpa.milkbox.net/packages/") t)

(let ((path (shell-command-to-string ". ~/.bashrc; echo -n $PATH")))
  (setenv "PATH" path)
  (setq exec-path
        (append
         (split-string-and-unquote path ":")
         exec-path)))

(load-theme 'busybee t)
(set-default-font "Bitstream Vera Sans Mono-14")
(setq initial-frame-alist '((fullscreen . maximized)))

(global-set-key (kbd "C-+") 'text-scale-increase)
(global-set-key (kbd "C-=") 'text-scale-increase)
(global-set-key (kbd "C--") 'text-scale-decrease)

(global-set-key (kbd "C-c n") 'linum-mode)
(global-set-key (kbd "C-c w") 'whitespace-mode)

(require 'evil)
(setq evil-emacs-state-modes
      (append
       '(haskell-interactive-mode)
       evil-emacs-state-modes))
(evil-mode 1)

(setq evil-lookup-func #'man)

(evil-define-motion evil-lookup ()
  (call-interactively evil-lookup-func))

(require 'evil-leader)
(global-evil-leader-mode)
(evil-leader/set-leader "<SPC>")
(evil-leader/set-key
  "f" 'find-file
  "g" 'dired
  "b" 'switch-to-buffer
  "d" 'kill-buffer
  "j" 'scroll-up
  "k" 'scroll-down
  "n" 'linum-mode
  "w" 'whitespace-mode
  "c" 'smart-compile
  "e" 'next-error)
(evil-leader/set-key-for-mode 'haskell-mode
  "l" 'haskell-process-load-file
  "t" 'haskell-process-do-type
  "i" 'haskell-process-do-info
  "v" 'haskell-interactive-switch)

(require 'p4)
(setenv "P4CONFIG" ".p4config")

(require 'smart-compile)
(setq smart-compile-alist
      (append
       '(("\\.c\\'"          . "clang -O2 %f -o %n && ./%n")
         ("\\.[Cc]+[Pp]*\\'" . "clang++ -std=c++11 -O2 %f -o %n && ./%n")
         ("\\.hs\\'"         . "ghc -O2 %f && ./%n")
         ("\\.py\\'"         . "python %f")
         ("\\.go\\'"         . "go build %f && ./%n"))
       smart-compile-alist))

(setq auto-mode-alist
      (append '(("\\.h\\'"  . c++-mode)
                ("\\.sc\\'" . python-mode))
              auto-mode-alist))

(ido-mode 1)
(menu-bar-mode 0)
(tool-bar-mode 0)
(scroll-bar-mode 0)
(show-paren-mode 1)
(which-func-mode 1)
(line-number-mode 1)
(column-number-mode 1)
(dynamic-completion-mode 1)
(auto-compression-mode 1)
(global-linum-mode 1)
(global-auto-revert-mode 1)

(fset 'yes-or-no-p 'y-or-n-p)
(setq confirm-nonexistent-file-or-buffer nil)
(setq inhibit-startup-message t)
(setq visible-bell nil)
(setq bell-volume 0)
(setq scroll-step 1)
(setq make-backup-files nil)
(setq windmove-wrap-around t)
(setq parens-require-spaces nil)
(setq ido-enable-flex-matching t)
(setq ido-create-new-buffer 'always)
(setq shell-file-name "bash")
(setq explicit-shell-file-name "bash")
(setq kill-buffer-query-functions
      (remq 'process-kill-buffer-query-function kill-buffer-query-functions))

(setq-default tab-width 8)
(setq-default fill-column 80)
(setq-default default-fill-column 80)
(setq-default indent-tabs-mode nil)
(setq-default show-trailing-whitespace t)
(setq-default scroll-preserve-screen-position t)

(add-hook 'haskell-mode-hook 'turn-on-haskell-indentation)

(require 'google-c-style)
(add-hook 'c-mode-common-hook 'google-set-c-style)