Fork me on GitHub
#emacs
<
2018-11-08
>
plexus23:11:21

Something I wish I had thought of earlier:

(defun plexus-clojure-extras/cider-pprint-register (register)
  (interactive (list (register-read-with-preview "Eval register: ")))
  (cider--pprint-eval-form (get-register register)))

plexus23:11:53

Select some clojure code, then do M-x copy-to-register (`C-x r x`), and pick a letter

plexus23:11:32

now with M-x plexus-clojure-extras/cider-pprint-register <letter> you can run that code from anywhere, and see the result in a pop-up buffer

plexus23:11:21

spacemacs folks can do this to have it available as ,,

(dolist (m '(clojure-mode
             clojurec-mode
             clojurescript-mode
             clojurex-mode
             cider-repl-mode
             cider-clojure-interaction-mode))

  (spacemacs/set-leader-keys-for-major-mode m
    "," 'plexus-clojure-extras/cider-pprint-register))

plexus23:11:04

e.g. I have (kaocha.repl/run) in register ,, now I can always re-run my tests with ,,,

👏 8