feat(emacs): evil: allow repeating window resizing commands

gekoke · May 12, 2024 · 3b87f57 · 3b87f57
1 parent d681e06
commit 3b87f57
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/modules/nixos/programs/emacs/init.el b/modules/nixos/programs/emacs/init.el
@@ -325,6 +325,13 @@
   (global-undo-tree-mode))
 
 (use-package evil
+  :init
+  (defvar evil-window-resizing-repeat-map
+    (let ((map (make-sparse-keymap)))
+      (define-key map ">" 'evil-window-increase-width)
+      (define-key map "<" 'evil-window-decrease-width) map))
+  (put 'evil-window-increase-width 'repeat-map 'evil-window-resizing-repeat-map)
+  (put 'evil-window-decrease-width 'repeat-map 'evil-window-resizing-repeat-map)
   :custom
   (evil-want-keybinding nil)
   (evil-want-C-u-scroll t)