diff --git a/README.md b/README.md
index cfef9e0..f2eb717 100644
--- a/README.md
+++ b/README.md
@@ -28,16 +28,16 @@ and add the following to your init.el:
     (require 'register-quicknav)
     (global-set-key (kbd "<C-f5>") #'register-quicknav-prev-register)
     (global-set-key (kbd "<C-f6>") #'register-quicknav-next-register)
-    (global-set-key (kbd "M-r")    #'register-quicknav-clear-current-register)
-    (global-set-key (kbd "C-M-r")  #'register-quicknav-point-to-unused-register)
+    (global-set-key (kbd "<C-f7>") #'register-quicknav-point-to-unused-register)
+    (global-set-key (kbd "<C-S-<f7>") #'register-quicknav-clear-current-register)
 
 Or, with use-package:
 
     (use-package register-quicknav
-      :bind (("C-<f5>" . register-quicknav-prev-register)
-             ("C-<f6>" . register-quicknav-next-register)
-             ("M-r"    . register-quicknav-clear-current-register)
-             ("C-M-r"  . register-quicknav-point-to-unused-register)))
+      :bind (("C-<f5>"   . register-quicknav-prev-register)
+             ("C-<f6>"   . register-quicknav-next-register)
+             ("C-<f7>"   . register-quicknav-point-to-unused-register)
+             ("C-S-<f7>" . register-quicknav-clear-current-register)))
 
 ## Variables
 
diff --git a/register-quicknav.el b/register-quicknav.el
index 1a78254..c56fdec 100644
--- a/register-quicknav.el
+++ b/register-quicknav.el
@@ -47,16 +47,16 @@
 ;; (require 'register-quicknav)
 ;; (global-set-key (kbd "<C-f5>") #'register-quicknav-prev-register)
 ;; (global-set-key (kbd "<C-f6>") #'register-quicknav-next-register)
-;; (global-set-key (kbd "M-r")    #'register-quicknav-clear-current-register)
-;; (global-set-key (kbd "C-M-r")  #'register-quicknav-point-to-unused-register)
+;; (global-set-key (kbd "<C-f7>") #'register-quicknav-point-to-unused-register)
+;; (global-set-key (kbd "<C-S-<f7>") #'register-quicknav-clear-current-register)
 ;;
 ;; Or, with use-package:
 ;;
 ;; (use-package register-quicknav
-;;   :bind (("C-<f5>" . register-quicknav-prev-register)
-;;          ("C-<f6>" . register-quicknav-next-register)
-;;          ("M-r"    . register-quicknav-clear-current-register)
-;;          ("C-M-r"  . register-quicknav-point-to-unused-register)))
+;;   :bind (("C-<f5>"   . register-quicknav-prev-register)
+;;          ("C-<f6>"   . register-quicknav-next-register)
+;;          ("C-<f7>"   . register-quicknav-point-to-unused-register)
+;;          ("C-S-<f7>" . register-quicknav-clear-current-register)))
 
 ;; Variables:
 ;;