diff --git a/data/init/dfhack.keybindings.init b/data/init/dfhack.keybindings.init
index 8ce0c3696..0fc596215 100644
--- a/data/init/dfhack.keybindings.init
+++ b/data/init/dfhack.keybindings.init
@@ -49,6 +49,9 @@ keybinding add Ctrl-H@dwarfmode autodump-destroy-here
 # apply blueprints to the map
 keybinding add Ctrl-Shift-Q@dwarfmode gui/quickfort
 
+# toggle keyboard cursor
+keybinding add Alt-K@dwarfmode toggle-kbd-cursor
+
 # show information collected by dwarfmonitor
 #keybinding add Alt-M@dwarfmode/Default "dwarfmonitor prefs"
 #keybinding add Ctrl-F@dwarfmode/Default "dwarfmonitor stats"
diff --git a/data/init/dfhack.tools.init b/data/init/dfhack.tools.init
index aaf0cf277..8fd815559 100644
--- a/data/init/dfhack.tools.init
+++ b/data/init/dfhack.tools.init
@@ -144,3 +144,4 @@ enable \
 
 alias add autounsuspend suspendmanager
 alias add gui/dig gui/design
+alias add toggle-kbd-cursor lua "local flags4 = df.global.d_init.flags4 if flags4.KEYBOARD_CURSOR then flags4.KEYBOARD_CURSOR = false else local guidm = require('gui.dwarfmode') guidm.setCursorPos(guidm.Viewport.get():getCenter()) flags4.KEYBOARD_CURSOR = true end"
diff --git a/docs/changelog.txt b/docs/changelog.txt
index 351e13d76..3806dd125 100644
--- a/docs/changelog.txt
+++ b/docs/changelog.txt
@@ -38,6 +38,7 @@ changelog.txt uses a syntax similar to RST, with a few special sequences:
 ## Fixes
 
 ## Misc Improvements
+- ``toggle-kbd-cursor``: add hotkey for toggling the keyboard cursor (Alt-K)
 
 ## Documentation