diff --git a/init.d/text/common.el b/init.d/text/common.el
index 27f3dac..d55b357 100644
--- a/init.d/text/common.el
+++ b/init.d/text/common.el
@@ -1,6 +1,6 @@
 ;;; common.el --- Common settings for text files. -*- lexical-binding: t; -*-
 
-;; Time-stamp: <2020-03-19T16:52:25+0100>
+;; Time-stamp: <2020-03-21T11:41:04+0100>
 
 ;;; Commentary:
 
@@ -13,12 +13,12 @@
   :custom ((require-final-newline t)   ; Always add newline at end of file.
            (fill-column 80)            ; Documents are 80 chars wide by default.
            (word-wrap t))              ; Wrap at word for continuation lines.
-  :bind (("C-r"    . jump-to-register)  ; Move point to location in register.
-         ("C-S-r"  . point-to-register) ; Store location of point in register.
-         ("M-S-w"  . copy-to-register)  ; Store text in register.
-         ("C-S-y"  . insert-register)   ; Insert text from register.
-         ("M-<f7>" . list-registers))   ; List all registers.
-  :hook (text-mode . auto-fill-mode))   ; Enable word-wrapping at fill-column.
+  :bind (("C-r"    . jump-to-register) ; Move point to location in register.
+         ("C-S-r"  . point-to-register); Store location of point in register.
+         ("M-W"    . copy-to-register) ; Store text in register.
+         ("C-S-y"  . insert-register)  ; Insert text from register.
+         ("M-<f7>" . list-registers))  ; List all registers.
+  :hook (text-mode . auto-fill-mode))  ; Enable word-wrapping at fill-column.
 
 ;; Quickly jump to next/previous register.
 (use-package register-quicknav