Z52JJYAJTTGPLIRJ52WJLMLS6Y2TK3T47WERVXGUB7LL2DUCPT7QC
CRI7QVNA3MX55HFSAOS44NFO7COXIGLLOWU3GLROZM77TQ52J46AC
RXCY7LD6ZRIOIKZEYKLMCYPMQPXF4DOEEFBDLVR2B22BXLZJFFBQC
A3TVGLVHSVLMEHLHB3TPBSD3QGNVGX3DIK6BEBDTTHWBNW4ALMRAC
HGGMS7P6BRIGWP6DZS3KLRXQPRETMB2GUULCQZAED6IYD5ENK2DQC
VR6IOKCA2J3I7OZDAD6LE43KBTPFBKII7SIYMWTFPAP2R4MPHTNAC
IOVPOFAVXEQIZ7BCFVVAWFW3RYFXPK2GOILDWA6N6QHQHLAJ4XTAC
IOXOZB2VUXVUEINLFBT4SPSJV32X5ZFT5FKSVRAIEXEFQJLG6MHQC
CDHF7XMC3TXNR6V5RCNMAJNB7DG3EVQL7APBAGUN6J25DTKBHACQC
6N46BCIIDUA2NCB7VHX6E47WNYYRSDMBHDOABZSVEEMJXWH2LLOAC
5FLRDDUAB7NCOKJKK57IVQBETGX7JTT7GVKFT46ORSZ7OJ7Q2UFQC
MDLZDQL6E4N5RLKKKRYNHSFONGR6RWGGYJ7JN4QVOAKJOAKNPOMQC
RBGV5L2RZ3QLWUYDVYEZ4YVTUS5BD4VYUQSYSPV2GXU6BSV3EFIQC
XJLV3OIIPQ6V6YHJGFI7RRDYI5MXTXCXSVKPOZFUOGMV4B2DEJSQC
7XDDBWIHI2COD5CEUUTJUPHH24ZYCTZDIMXUXNKZZTUDGMADO6HAC
2GNS6EEXJ7EEZWESALVQ2QOGEVWOEE4VC6HOKCLL7UTEPFACJYKQC
F3ENAOSOVGL4WEGHDMXC7MHRZK2Q4M35YYW433N2ABZ6S3SU4AAQC
77GFHLOOX3JBBHHHSSR7TFOMOFUCIT5P6A7PQQOVNCZULXKMERMAC
YXDBKG5MWREH25GV2RUUW7ZI4P2XBNMZSB77WND3A6LUAL4NN63QC
IUA6MCZWWCFQ4EJ4GBWYAPLM4IE7SFB34CGSJJTBVOAFTSL4EDEAC
UIXIJMKKE7STQ65EALHSRFO7J64YCRPRQOQRAX7FJ27455W4X3WAC
(use-package color-theme-modern :ensure t)
(use-package zenburn-theme :ensure t)
(add-to-list 'load-path "~/.emacs.d/themes/")
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes/")
(require 'el-zenburn-theme)
;;(color-theme-initialize)
(load-theme 'el-zenburn t)
(use-package company-tern
:ensure t
:config
(add-to-list 'company-backends 'company-tern)
(setq company-tooltip-align-annotations t)))
(use-package company-tern
:ensure t
:config
(add-to-list 'company-backends 'company-tern)
(setq company-tooltip-align-annotations t))
(defun cider-eval-expression-at-point-in-repl ()
(interactive)
(let ((form (cider-defun-at-point)))
;; Strip excess whitespace
(while (string-match "\\`\s+\\|\n+\\'" form)
(setq form (replace-match "" t t form)))
(with-current-buffer (cider-current-repl nil t)
(let ((fw/window (get-buffer-window)))
(with-selected-window fw/window
(end-of-buffer)
(insert form)
(cider-repl-return)
(end-of-buffer))))))
(define-key cider-mode-map
(kbd "C-c C-j") 'cider-eval-expression-at-point-in-repl)