                         (interactive)
                         (find-file ,full-filename))))
     (if keybinding
-        (let* ((full-keybinding (concat "M-RET e " keybinding))
+        (let* ((full-keybinding (concat "M-P e " keybinding))
                (set-key-form `(global-set-key (kbd ,full-keybinding)
                                               #',defun-name)))
           `(progn

;;;; Finding files

;; The following code adds keybindings for jumping to the various
;; dotfiles set up by Radian. These all begin with <M-RET e> and are
;; designed to be mnemonic, as in <M-RET e e i> standing for "[e]dit
;; [e]macs [i]nit.el".

(defmacro radian-register-dotfile (filename &optional keybinding)

  (radian-load-user-config "init.el")
  (message "Reloading init.el... done."))

(global-set-key (kbd "M-P r") #'radian-reload-init)

;; Add a keybinding (C-c C-k) for evaluating a buffer of Elisp. This
;; is consistent with the keybindings for evaluating a buffer in CIDER
