doomemacs/modules/lang/clojure/config.el

;;; lang/clojure/config.el -*- lexical-binding: t; -*-

(def-package! clojure-mode
  :mode (("\\.clj$" . clojure-mode)
         ("\\.cljs$". clojurescript-mode))
  :commands (clojure-mode clojurescript-mode) ;; this might not be necessary?
  :config

  (def-package! clj-refactor  ;; prob a better place to do this...using hooks?
    :demand t
    :config
    ;; setup some extra namespace auto completion for great awesome
    (dolist (mapping '(("re-frame" . "re-frame.core")
                       ("reagent"  . "reagent.core")
                       ("str"      . "clojure.str")))
      (add-to-list 'cljr-magic-require-namespaces mapping t)))

  (map! :map clojure-mode-map
        (:localleader
         :n  "'"      #'cider-jack-in
         :n  "\""     #'cider-jack-in-clojurescript
         :n  "b"      #'cider-switch-to-repl-buffer
         :n  "n"      #'cider-repl-set-ns
         :n  "j"      #'cider-find-var
         :n  "d"      #'cider-doc
         :n  "c"      #'cider-repl-clear-buffer
         :n  "r"      #'cider-eval-region)))


(def-package! cider
  ;; BUG: 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-mode cider-jack-in-clojurescript)
  :config
  (setq nrepl-hide-special-buffers t)

  ;; TODO: figure out how to set cider to the right window rather than shackle window (https://github.com/hlissner/doom-emacs/issues/171)
  ;; (set! :popup "^\\*cider-.*" :align 'left :noesc t) ;; no luck

  ;; Setup cider for clojurescript / figwheel dev.
  (setq cider-cljs-lein-repl
        "(do (require 'figwheel-sidecar.repl-api)
         (figwheel-sidecar.repl-api/start-figwheel!)
         (figwheel-sidecar.repl-api/cljs-repl))"))
Major optimization refactor, across the board + enable lexical-scope everywhere (lexical-binding = t): ~5-10% faster startup; ~5-20% general boost + reduce consing, function calls & garbage collection by preferring cl-loop & dolist over lambda closures (for mapc[ar], add-hook, and various cl-lib filter/map/reduce functions) -- where possible + prefer functions with dedicated opcodes, like assq (see byte-defop's in bytecomp.el for more) + prefer pcase & cond (faster) over cl-case + general refactor for code readability + ensure naming & style conventions are adhered to + appease byte-compiler by marking unused variables with underscore + defer minor mode activation to after-init, emacs-startup or window-setup hooks; a customization opportunity for users + ensures custom functionality won't interfere with startup. 2017-06-08 11:47:56 +02:00			`;;; lang/clojure/config.el -- lexical-binding: t; --`
Minimal Clojure lang support 2017-05-30 09:28:38 +02:00
			`(def-package! clojure-mode`
Add cljs mode and localleader keybindings 2017-11-03 13:41:54 -04:00			`:mode (("\\.clj$" . clojure-mode)`
			`("\\.cljs$". clojurescript-mode))`
Add figwheel settings + try and unshackle the repl (no luck yet!) 2017-11-03 19:28:05 -04:00			`:commands (clojure-mode clojurescript-mode) ;; this might not be necessary?`
Add cljs mode and localleader keybindings 2017-11-03 13:41:54 -04:00			`:config`
name space auto completion 2017-11-21 13:25:00 -05:00
			`(def-package! clj-refactor ;; prob a better place to do this...using hooks?`
			`:demand t`
			`:config`
			`;; setup some extra namespace auto completion for great awesome`
			`(dolist (mapping '(("re-frame" . "re-frame.core")`
			`("reagent" . "reagent.core")`
			`("str" . "clojure.str")))`
			`(add-to-list 'cljr-magic-require-namespaces mapping t)))`
Add clj refactor 2017-11-18 14:54:05 -05:00
Add cljs mode and localleader keybindings 2017-11-03 13:41:54 -04:00			`(map! :map clojure-mode-map`
			`(:localleader`
Add clj refactor 2017-11-18 14:54:05 -05:00			`:n "'" #'cider-jack-in`
			`:n "\"" #'cider-jack-in-clojurescript`
			`:n "b" #'cider-switch-to-repl-buffer`
			`:n "n" #'cider-repl-set-ns`
			`:n "j" #'cider-find-var`
			`:n "d" #'cider-doc`
			`:n "c" #'cider-repl-clear-buffer`
			`:n "r" #'cider-eval-region)))`
Minimal Clojure lang support 2017-05-30 09:28:38 +02:00
Add figwheel settings + try and unshackle the repl (no luck yet!) 2017-11-03 19:28:05 -04:00
Minimal Clojure lang support 2017-05-30 09:28:38 +02:00			`(def-package! cider`
Add figwheel settings + try and unshackle the repl (no luck yet!) 2017-11-03 19:28:05 -04:00			`;; BUG: if you don't have an org directory set (the dir doesn't exist), cider jack in won't work.`
Add cljs mode and localleader keybindings 2017-11-03 13:41:54 -04:00			`:commands (cider-jack-in cider-mode cider-jack-in-clojurescript)`
Minimal Clojure lang support 2017-05-30 09:28:38 +02:00			`:config`
Add figwheel settings + try and unshackle the repl (no luck yet!) 2017-11-03 19:28:05 -04:00			`(setq nrepl-hide-special-buffers t)`

			`;; TODO: figure out how to set cider to the right window rather than shackle window (https://github.com/hlissner/doom-emacs/issues/171)`
			`;; (set! :popup "^\\cider-." :align 'left :noesc t) ;; no luck`

			`;; Setup cider for clojurescript / figwheel dev.`
			`(setq cider-cljs-lein-repl`
			`"(do (require 'figwheel-sidecar.repl-api)`
			`(figwheel-sidecar.repl-api/start-figwheel!)`
			`(figwheel-sidecar.repl-api/cljs-repl))"))`