From 24015ba72720abfafd29dec00276de2e22da13a6 Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Wed, 25 Aug 2021 23:05:43 -0500
Subject: Change page navigation keys and enable repeat-map

---
 init.el | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

(limited to 'init.el')

diff --git a/init.el b/init.el
index 162c86c..beb8611 100644
--- a/init.el
+++ b/init.el
@@ -667,8 +667,16 @@ like a dumbass."
   (:advise forward-page :after #'recenter-to-top
            backward-page :after #'recenter-to-top)
 
-  (:global "C-x C-n" forward-page
-           "C-x C-p" backward-page))
+  ;; I'm not sure where this is in /my/ version of Emacs
+  (defvar page-navigation-repeat-map
+    (let ((map (make-sparse-keymap)))
+      (define-key map "]" #'forward-page)
+      (define-key map "[" #'backward-page)
+      map)
+    "Keymap to repeat page navigation key sequences.  Used in `repeat-mode'.")
+
+  (put 'forward-page 'repeat-map 'page-navigation-repeat-map)
+  (put 'backward-page 'repeat-map 'page-navigation-repeat-map))
 
 (setup prog
   (:option smie-indent-basic tab-width)
-- 
cgit 1.4.1-21-gabe81