about summary refs log tree commit diff
path: root/init/clojure.el
diff options
context:
space:
mode:
authorVincent Ambo <vincent@kivra.com>2014-12-29T20·51+0100
committerVincent Ambo <vincent@kivra.com>2014-12-29T20·51+0100
commitfb9a837c67a3f7e15c89daad168f2982aa3be8cc (patch)
tree830643ffade4477057c93b8920bd4b7d3a28f12b /init/clojure.el
parent677eba3e60b5f1b1473524a83e4d73dae1cba99b (diff)
Split out Haskell and Clojure config
Diffstat (limited to 'init/clojure.el')
-rw-r--r--init/clojure.el45
1 files changed, 45 insertions, 0 deletions
diff --git a/init/clojure.el b/init/clojure.el
new file mode 100644
index 000000000000..5ec4848b8fa3
--- /dev/null
+++ b/init/clojure.el
@@ -0,0 +1,45 @@
+(require 'cider)
+(require 'ac-cider-compliment)
+
+;; 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)
+
+;; I want history up/down without modifiers
+(define-key cider-repl-mode-map (kbd "<up>") 'cider-repl-backward-input)
+(define-key cider-repl-mode-map (kbd "<down>") 'cider-repl-forward-input)
+(define-key cider-repl-mode-map (kbd "C-<up>") 'previous-line)
+(define-key cider-repl-mode-map (kbd "C-<down>") 'next-line)
+
+;; ... and ac-cider with C-c C-d
+(define-key cider-repl-mode-map (kbd "C-c C-d") 'ac-cider-compliment-popup-doc)
+(define-key cider-mode-map (kbd "C-c C-d") 'ac-cider-compliment-popup-doc)
+(define-key cider-mode-map (kbd "C-c D") 'cider-doc)
+
+
+(provide 'clojure)