 (global-set-key (kbd "C-.") 'imenu-anywhere)
 (global-set-key (kbd "M-%") 'anzu-query-replace)
 (global-set-key (kbd "C-M-%") 'anzu-query-replace-regexp)
+
+(add-hook 'racket-mode-hook          ;; same as C-c C-k
+          (lambda ()
+            (define-key racket-mode-map (kbd "C-c r") 'racket-run)))

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

(if (kelly?)
    (set-background-color "gray90")

                      json-mode
                      anzu
                      undo-tree
                      racket-mode
                      glsl-mode))

(dolist (p df/packages)
