From 0922e755d219eb411c5c1ba42140790538aa3b0d Mon Sep 17 00:00:00 2001 From: Damien Cassou Date: Wed, 26 Oct 2022 16:53:23 +0200 Subject: [PATCH] Make winner key sequences repeatable in repeat-mode * lisp/winner.el (winner-repeat-map): New variable. (winner-undo, winner-redo): Put 'repeat-map' property with 'winner-repeat-map'. (Bug#58799) --- lisp/winner.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/lisp/winner.el b/lisp/winner.el index 174b698e7b5..c8354b18bec 100644 --- a/lisp/winner.el +++ b/lisp/winner.el @@ -328,6 +328,14 @@ You may want to include buffer names such as *Help*, *Apropos*, map) "Keymap for Winner mode.") +(defvar-keymap winner-repeat-map + :doc "Keymap to repeat winner key sequences. Used in `repeat-mode'." + "" #'winner-undo + "" #'winner-redo) + +(put #'winner-undo 'repeat-map 'winner-repeat-map) +(put #'winner-redo 'repeat-map 'winner-repeat-map) + ;;;###autoload (define-minor-mode winner-mode -- 2.39.5