lisp-settings.el

  ;; Lisp (common)

  (defun my/lisp-mode-defaults ()
    (paredit-mode 1)
    (rainbow-delimiters-mode 1)
    (eldoc-mode 1))

  (defun my/lisp-mode-hook ()
    (my/lisp-mode-defaults))

  ;; Clojure

  (add-hook 'clojure-mode-hook #'my/lisp-mode-hook)
  (add-hook 'cider-repl-mode-hook #'my/lisp-mode-hook)
  (setq nrepl-log-messages t
        ;; cider-repl-display-in-current-window t
        cider-repl-use-clojure-font-lock t
        cider-prompt-save-file-on-load 'always-save
        cider-font-lock-dynamically '(macro core function var)
        cider-overlays-use-font-lock t
        cider-default-cljs-repl "Figwheel")

  (require 'clojure-mode)
  (define-clojure-indent
    ;; clojure.spec
    (fdef 1)
    ;; test.check
    (for-all :defn))

  ;; Common Lisp

  (add-hook 'lisp-mode-hook #'my/lisp-mode-hook)
  (add-hook 'slime-mode-hook #'my/lisp-mode-hook)
  (add-hook 'slime-repl-mode-hook #'my/lisp-mode-hook)
  (setq inferior-lisp-program "sbcl")

  ;; Scheme

  (add-hook 'scheme-mode-hook #'my/lisp-mode-hook)
  (add-hook 'geiser-mode-hook #'my/lisp-mode-hook)
  (add-hook 'geiser-repl-mode-hook #'my/lisp-mode-hook)
  (setq geiser-active-implementations '(racket))

  ;; Emacs Lisp

  (add-hook 'emacs-lisp-mode-hook #'my/lisp-mode-hook)
  (add-hook 'ielm-mode-hook #'my/lisp-mode-hook)

  ;; Hy

  (add-hook 'hy-mode-hook #'my/lisp-mode-hook)