--- a/.emacs-my	Fri Jan 27 17:23:34 2017 +0200
+++ b/.emacs-my	Fri Jan 27 19:51:50 2017 +0200
@@ -302,6 +302,16 @@
   "List of text mode hooks.")
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "MS Windows, w32, win32")
+
+;; To remap CapsLock to ScrollLock:
+;; Windows Registry Editor Version 5.00
+;; [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Keyboard Layout]
+;; "Scancode Map"=hex:00,00,00,00,00,00,00,00,02,00,00,00,46,00,3a,00,00,00,00,00
+(when (eq system-type 'nt)
+  (setq w32-scroll-lock-modifier 'super))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (message "package, elpa")
 
 (eval-when 'compile (require 'package nil t))