>> From 8b980efcd9497e395f4d82a1304267ae4426b00d Mon Sep 17 00:00:00 2001
>> From: Visuwesh <[email protected]>
>> Date: Mon, 9 Sep 2024 19:46:47 +0530
>> Subject: [PATCH] Add repeat-mode keymap for navigation commands
>>
>> * org-keys.el (org-navigation-repeat-map): Add repeat-map to make
>> navigation easier when repeat-mode is turned on.
>
> May you also add a news entry?
> Ideally, we should also document this in the manual.
Do you think it makes sense to add repeat-maps for other next/previous
commands in Org, such as org-next-link and org-previous-link? I've been
using this for a while (they don't use defvar-keymap as I wrote them a
while ago):
(defvar org-link-navigation-repeat-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "n") #'org-next-link)
(define-key map (kbd "p") #'org-previous-link)
(define-key map (kbd "v") #'org-link-preview) ;toggle preview for link at
point
map))
(map-keymap
(lambda (_ cmd)
(put cmd 'repeat-map 'org-link-navigation-repeat-map))
org-link-navigation-repeat-map)
(defvar org-block-navigation-repeat-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "f") #'org-next-block)
(define-key map (kbd "b") #'org-previous-block)
map))
(put 'org-next-block 'repeat-map 'org-block-navigation-repeat-map)
(put 'org-previous-block 'repeat-map 'org-block-navigation-repeat-map)
