gistfile1.el

(add-to-list 'load-path "~/.emacs.d/community")
(add-to-list 'load-path "~/.emacs.d/community/powerline")
(add-to-list 'load-path "~/.emacs.d/community/tester.el")

;; Behavior

;; disable the splash screen
(setq inhibit-splash-screen t)

(when (not (display-graphic-p))
  (menu-bar-mode -1)
)

(setq make-backup-files nil)
(setq auto-save-default nil)
(setq inhibit-startup-message t)
(fset 'yes-or-no-p 'y-or-n-p)
(delete-selection-mode t)
(blink-cursor-mode t)
(show-paren-mode t)
(column-number-mode t)
(global-linum-mode t)

(setq-default indent-tabs-mode nil)
(setq indent-tabs-mode nil)
(setq tab-stop-list (number-sequence 2 120 2))
(setq-default tab-width 2)
(setq evil-shift-width 2)

(require 'package)
(add-to-list 'package-archives
  '("melpa" . "http://melpa.org/packages/") t)
(push '("marmalade" . "http://marmalade-repo.org/packages/")
        package-archives )
(package-initialize)

(require 'neotree)
(global-set-key [f8] 'neotree-toggle)

(require 'dockerfile-mode)
(add-to-list 'auto-mode-alist '("Dockerfile\\'" . dockerfile-mode))
(add-to-list 'auto-mode-alist '("\\.docker\\'" . dockerfile-mode))

(require 'yasnippet)
(yas-global-mode 1)
(define-key yas-minor-mode-map (kbd "<tab>") 'yas-expand)
(define-key yas-minor-mode-map (kbd "TAB") 'yas-expand)

(add-hook 'after-init-hook 'global-company-mode)

(projectile-global-mode)
(setq projectile-completion-system 'helm)

;; Elixir
(require 'alchemist)
(setq alchemist-project-compile-when-needed t)

  ;; tester.el
(require 'tester)
(defun default-elixir-mode-hook ()
  (tester-init-test-run #'alchemist-mix-test-file "_test.exs$")
  (tester-init-test-suite-run #'alchemist-mix-test))

(add-hook 'elixir-mode-hook  'default-elixir-mode-hook)

(require 'evil)
  (evil-mode 1)
(define-key evil-normal-state-map (kbd "q") nil)

(require 'evil-surround)
(global-evil-surround-mode)

(require 'powerline)
(powerline-center-evil-theme)

(require 'helm-config)
(helm-mode 1)

;;(load "~/.emacs.d/community/floobits/floobits.el")

;; Language Specific

;; Ruby

(require 'rspec-mode)
(add-to-list 'auto-mode-alist '("\\.simplecov\\'" . ruby-mode))

  ;; tester.el
(defun default-ruby-mode-hook ()
  (tester-init-test-run #'rspec-run-single-file "_spec.rb$")
  (tester-init-test-suite-run #'rake-test))

(add-hook 'ruby-mode-hook  'default-ruby-mode-hook)

;; Clojure
(add-hook 'cider-mode-hook 'cider-turn-on-eldoc-mode)
(add-hook 'cider-repl-mode-hook 'company-mode)
(add-hook 'cider-mode-hook 'company-mode)

;;Haskell
(add-hook 'haskell-mode-hook 'turn-on-haskell-indentation)
(add-hook 'haskell-mode-hook 'turn-on-hi2)
(autoload 'ghc-init "ghc" nil t)
(autoload 'ghc-debug "ghc" nil t)
(add-hook 'haskell-mode-hook (lambda () (ghc-init)))
(let ((my-cabal-path (expand-file-name "~/Library/Haskell/bin")))
  (setenv "PATH" (concat my-cabal-path ":" (getenv "PATH")))
  (add-to-list 'exec-path my-cabal-path))
(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(haskell-tags-on-save t)
 '(safe-local-variable-values (quote ((encoding . utf-8)))))


(eval-after-load 'company
  (progn
    '(add-to-list 'company-backends '(alchemist-company company-yasnippet))
    ))

;; Markdown
(add-to-list 'auto-mode-alist '("README\\.md\\'" . gfm-mode))

;; Appearance

(when (display-graphic-p)
  (add-to-list 'custom-theme-load-path "~/.emacs.d/community/base16")
  (load-theme 'base16-monokai t))

(when (not (display-graphic-p))
  (add-to-list 'custom-theme-load-path "~/.emacs.d/community/base16")
    (load-theme 'base16-monokaiterm t)
)

;(add-to-list 'custom-theme-load-path "~/.emacs.d/community/base16")
;  (load-theme 'base16-monokaiterm t)

(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(default ((t (:inherit prog-mode-default :height 200 :family "Anonymous Pro"))))
 '(cursor ((t (:foreground "#DCDCCC" :background "#F8F8F80")))))