From d1a622cf8e03e829ac30086178cab61b64282521 Mon Sep 17 00:00:00 2001
From: Kévin Le Gouguec <kevin.legouguec@gmail.com>
Date: Wed, 14 Apr 2021 22:59:28 +0200
Subject: Enable repeat-mode for Emacs≥28
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .emacs           | 16 ++++++++--------
 .emacs-custom.el |  1 +
 2 files changed, 9 insertions(+), 8 deletions(-)

diff --git a/.emacs b/.emacs
index 8290a1d..fb30d26 100644
--- a/.emacs
+++ b/.emacs
@@ -36,14 +36,14 @@
 
 (global-set-key (kbd "C-x C-b") 'ibuffer)
 
-(defun my/other-window (count &optional all-frames)
-  (interactive "p")
-  (let ((repeat-map (make-sparse-keymap)))
-    (define-key repeat-map [?o] #'other-window)
-    (set-transient-map repeat-map t)
-    (other-window count all-frames)))
-
-(global-set-key (kbd "C-x o") #'my/other-window)
+(when (< emacs-major-version 28)
+  (defun my/other-window (count &optional all-frames)
+    (interactive "p")
+    (let ((repeat-map (make-sparse-keymap)))
+      (define-key repeat-map [?o] #'other-window)
+      (set-transient-map repeat-map t)
+      (other-window count all-frames)))
+  (global-set-key (kbd "C-x o") #'my/other-window))
 
 ;; Hopefully these will be easier to remember than TeX commands:
 
diff --git a/.emacs-custom.el b/.emacs-custom.el
index ef10a73..742822a 100644
--- a/.emacs-custom.el
+++ b/.emacs-custom.el
@@ -96,6 +96,7 @@
  '(read-char-by-name-group t)
  '(read-char-by-name-sort 'code)
  '(read-file-name-completion-ignore-case t)
+ '(repeat-mode t)
  '(scroll-bar-mode nil)
  '(scroll-conservatively 10)
  '(scroll-preserve-screen-position t)
-- 
cgit v1.2.3