Emacs Clojure

init.el

(require 'package)

(defun arrange-frame (w h x y)
  (let ((frame (selected-frame)))
    (delete-other-windows)
    (set-frame-position frame x y)
    (set-frame-size frame w h)))

(arrange-frame 190 90 1200 5)

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

(defvar my-packages '(starter-kit
                      starter-kit-lisp
                      starter-kit-bindings
                      starter-kit-ruby
                      starter-kit-eshell
                      clojure-mode
                      clojure-test-mode
                      expectations-mode
                      nrepl
                      auto-complete
                      ac-nrepl))

(dolist (p my-packages)
  (when (not (package-installed-p p))
    (package-install p)))

;; solarized
(load-theme 'solarized-dark t)

(add-to-list 'load-path "~/.emacs.d/vendor/textmate.el")
(require 'textmate)
(textmate-mode)

;; whitespace
(require 'whitespace)
(add-hook 'clojure-mode-hook 'whitespace-mode)
(setq whitepsace-line-column 110)

;; nrepl
(require 'ac-nrepl)
(add-hook 'nrepl-mode-hook 'ac-nrepl-setup)
(add-hook 'nrepl-interaction-mode-hook 'ac-nrepl-setup)
(eval-after-load "auto-complete"
  '(add-to-list 'ac-modes 'nrepl-mode))

(setq nrepl-popup-stacktraces nil)

(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)

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