From 1d4a41833ef7d4541940419d83b53b7bbfc179a7 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Tue, 3 Jul 2018 20:05:27 +0200 Subject: [PATCH] Don't wrap forward/backward-button keys --- modules/ui/doom-dashboard/autoload.el | 12 ++++++++++++ modules/ui/doom-dashboard/config.el | 2 ++ 2 files changed, 14 insertions(+) diff --git a/modules/ui/doom-dashboard/autoload.el b/modules/ui/doom-dashboard/autoload.el index 26c0e4a0d..b003edbf1 100644 --- a/modules/ui/doom-dashboard/autoload.el +++ b/modules/ui/doom-dashboard/autoload.el @@ -6,3 +6,15 @@ (interactive (list (selected-frame))) (with-selected-frame frame (switch-to-buffer (+doom-dashboard-initial-buffer)))) + +;;;###autoload +(defun +doom-dashboard/forward-button (n) + "Like `forward-button', but don't wrap." + (interactive "p") + (forward-button n nil)) + +;;;###autoload +(defun +doom-dashboard/backward-button (n) + "Like `backward-button', but don't wrap." + (interactive "p") + (backward-button n nil)) diff --git a/modules/ui/doom-dashboard/config.el b/modules/ui/doom-dashboard/config.el index 9c78f03b7..7025cb4a8 100644 --- a/modules/ui/doom-dashboard/config.el +++ b/modules/ui/doom-dashboard/config.el @@ -131,6 +131,8 @@ PLIST can have the following properties: (add-hook 'post-command-hook #'+doom-dashboard|reposition-point nil t)) (define-key! +doom-dashboard-mode-map + [remap forward-button] #'+doom-dashboard/forward-button + [remap backward-button] #'+doom-dashboard/backward-button "n" #'forward-button "p" #'backward-button "\C-n" #'forward-button