doomemacs/modules/lang/clojure/config.el

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

;; `clojure-mode'
(after! clojure-mode
  (add-hook 'clojure-mode-hook #'rainbow-delimiters-mode)

  (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)
    :init
    (set-popup-rule! "^\\*cider-repl" :quit nil :select nil)
    (set-repl-handler! 'clojure-mode #'+clojure/repl)
    (set-eval-handler! 'clojure-mode #'cider-eval-region)
    (set-lookup-handlers! 'clojure-mode
      :definition #'cider-browse-ns-find-at-point
      :documentation #'cider-browse-ns-doc-at-point)
    :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)
    (map! :map cider-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  "h"  #'cider-doc
          :n  "c"  #'cider-repl-clear-buffer
          :n  "p"  #'cider-eval-sexp-at-point))

  (def-package! clj-refactor
    :config
    (map! :map clj-refactor-map
          :localleader
          :desc "Refactor hydra" :n "r" #'hydra-cljr-help-menu/body)))

(when (and (featurep! +joker) (featurep! :feature syntax-checker))
  (load! "+joker"))
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
Major refactor & optimization of how modules load their packages Now that we are loading package autoloads files (as part of the generated doom-package-autoload-file when running make autoloads), many :commands properties are redundant. In fact, many def-package! blocks are redundant. In some cases, we can do without a config.el file entirely, and can move into the autoloads file or rely entirely on package autoloads. Also, many settings have been moved in their module's autoloads files, which makes them available ASAP; their use no longer depends on module load order. This gained me a modest ~10% boost in startup speed. 2018-05-25 00:46:11 +02:00			;; `clojure-mode'
Refactor lang/clojure & fix clojure handlers Ensure repl/eval/lookup handlers are set soon enough to take effect in first buffer. 2018-08-19 01:12:24 +02:00			`(after! clojure-mode`
			`(add-hook 'clojure-mode-hook #'rainbow-delimiters-mode)`
Minimal Clojure lang support 2017-05-30 09:28:38 +02:00
Refactor lang/clojure & fix clojure handlers Ensure repl/eval/lookup handlers are set soon enough to take effect in first buffer. 2018-08-19 01:12:24 +02:00			`(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)`
			`:init`
			`(set-popup-rule! "^\\*cider-repl" :quit nil :select nil)`
			`(set-repl-handler! 'clojure-mode #'+clojure/repl)`
			`(set-eval-handler! 'clojure-mode #'cider-eval-region)`
			`(set-lookup-handlers! 'clojure-mode`
			`:definition #'cider-browse-ns-find-at-point`
			`:documentation #'cider-browse-ns-doc-at-point)`
			`: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)`
			`(map! :map cider-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 "h" #'cider-doc`
			`:n "c" #'cider-repl-clear-buffer`
Merge branch 'develop' of https://github.com/hlissner/doom-emacs into develop 2018-08-19 14:29:21 -05:00			`:n "p" #'cider-eval-sexp-at-point))`
Add figwheel settings + try and unshackle the repl (no luck yet!) 2017-11-03 19:28:05 -04:00
Merge branch 'develop' of https://github.com/hlissner/doom-emacs into develop 2018-08-19 14:29:21 -05:00			`(def-package! clj-refactor`
			`:config`
			`(map! :map clj-refactor-map`
			`:localleader`
			`:desc "Refactor hydra" :n "r" #'hydra-cljr-help-menu/body)))`
Add option for flycheck-joker for clojure This is provided as a +feature on clojure because joker is not included in the standard clojure distribution, and I wouldn't assume a given clojurist has or wants to have it installed. But I think installing it is the least-fuss option for syntax-checking clojure/script code in emacs with flycheck. 2018-09-07 20:35:29 -07:00
			`(when (and (featurep! +joker) (featurep! :feature syntax-checker))`
			`(load! "+joker"))`