                                    (mu4e)
                                    (mu4e-update-mail-and-index nil))))
 
+(defun setup-cider ()
+  (require 'cider)
+  (add-hook 'cider-mode-hook #'eldoc-mode)
+  ;; (setq cider-auto-mode nil)
+  ;; (setq nrepl-log-messages nil)
+  ;; (setq nrepl-hide-special-buffers t)
+  (setq cider-repl-use-pretty-printing t)
+  (setq cider-prompt-save-file-on-load nil))
+
+(when (not (kelly?))
+  (setq compile-command "scons")
+  (setup-mu4e)
+  (setup-cider)
+  (require 'racket-mode)
+  (add-hook 'racket-mode-hook          ;; same as C-c C-k
+            (lambda ()
+              (define-key racket-mode-map (kbd "C-c r") 'racket-run))))
+
 (global-set-key (kbd "RET") 'newline-and-indent)
 (global-set-key (kbd "TAB") #'company-indent-or-complete-common)
 (global-set-key (kbd "M-r") 'recompile)

(global-undo-tree-mode 1)           ;; C-x u
(defalias 'redo 'undo-tree-redo)

(require 'racket-mode)

(if (kelly?)
    (set-background-color "gray90")
  (load-theme 'flatui t))

(add-to-list 'auto-mode-alist '("\\.fsh\\'" . glsl-mode))
(add-to-list 'auto-mode-alist '("\\.usf\\'" . glsl-mode))     ;; unreal engine

(defun setup-mu4e ()
  (setq epa-file-cache-passphrase-for-symmetric-encryption t)
  (setq smtpmail-auth-credentials "~/.authinfo")
  (when (equal system-type 'gnu/linux)
