diff --git a/extensions/lisp-mode/ext/hyperspec.lisp b/extensions/lisp-mode/ext/hyperspec.lisp
index 0b1724d4a..f1d3de301 100644
--- a/extensions/lisp-mode/ext/hyperspec.lisp
+++ b/extensions/lisp-mode/ext/hyperspec.lisp
@@ -992,6 +992,11 @@ It can also be a path to load it locally:
 (defparameter *symbols* (make-hash-table :test 'equal)
   "Maps symbol names to relative urls in the hyperspec.")
 
+(define-key lem-lisp-mode/internal:*lisp-mode-keymap*
+  "C-c C-d h" 'lisp-hyperspec-at-point)
+(define-key lem-lisp-mode/internal:*lisp-repl-mode-keymap*
+  "C-c C-d h" 'lisp-hyperspec-at-point)
+
 (defun hlookup (symbol)
   (unless (> (hash-table-count *symbols*) 0)
     (hload-symbols))