d8b1e469bc
+ :popup -> set-popup-rule! + :popups -> set-popup-rules! + :company-backend -> set-company-backend! + :evil-state -> set-evil-initial-state! I am slowly phasing out the setting system (def-setting! and set!), starting with these. What are autodefs? These are functions that are always defined, whether or not their respective modules are enabled. However, when their modules are disabled, they are replaced with macros that no-op and don't waste time evaluating their arguments. The old set! function will still work, for a while.
51 lines
1.8 KiB
EmacsLisp
51 lines
1.8 KiB
EmacsLisp
;;; lang/clojure/config.el -*- lexical-binding: t; -*-
|
|
|
|
;; `clojure-mode'
|
|
(add-hook 'clojure-mode-hook #'rainbow-delimiters-mode)
|
|
|
|
|
|
(def-package! clj-refactor
|
|
:after clojure-mode
|
|
:config
|
|
;; setup some extra namespace auto completion for great awesome
|
|
(dolist (ns '(("re-frame" . "re-frame.core")
|
|
("reagent" . "reagent.core")
|
|
("str" . "clojure.string")))
|
|
(map-put cljr-magic-require-namespaces (car ns) (cdr ns))))
|
|
|
|
|
|
(def-package! cider
|
|
;; NOTE: if you don't have an org directory set (the dir doesn't exist), cider
|
|
;; jack in won't work.
|
|
:commands (cider-jack-in cider-jack-in-clojurescript)
|
|
:hook (clojure-mode . cider-mode)
|
|
:config
|
|
(setq nrepl-hide-special-buffers t
|
|
cider-stacktrace-default-filters '(tooling dup)
|
|
cider-prompt-save-file-on-load nil
|
|
cider-repl-use-clojure-font-lock t
|
|
;; Setup cider for clojurescript / figwheel dev.
|
|
cider-cljs-lein-repl
|
|
"(do (require 'figwheel-sidecar.repl-api)
|
|
(figwheel-sidecar.repl-api/start-figwheel!)
|
|
(figwheel-sidecar.repl-api/cljs-repl))")
|
|
|
|
(set-popup-rule! "^\\*cider-repl" nil '((quit) (select)))
|
|
(set! :repl 'clojure-mode #'+clojure/repl)
|
|
(set! :eval 'clojure-mode #'cider-eval-region)
|
|
(set! :lookup 'clojure-mode
|
|
:definition #'cider-browse-ns-find-at-point
|
|
:documentation #'cider-browse-ns-doc-at-point)
|
|
|
|
(map! :map cider-mode-map
|
|
:localleader
|
|
:n "'" #'cider-jack-in
|
|
:n "\"" #'cider-jack-in-clojurescript
|
|
:n "B" #'cider-switch-to-repl-buffer
|
|
:n "b" #'cider-eval-buffer
|
|
:n "n" #'cider-repl-set-ns
|
|
:n "j" #'cider-find-var
|
|
:n "d" #'cider-doc
|
|
:n "c" #'cider-repl-clear-buffer
|
|
:n "p" #'cider-eval-sexp-at-point
|
|
:n "r" #'cider-eval-region))
|