From f1c90bc2ffd0743c69136ed770da00b493ea99f6 Mon Sep 17 00:00:00 2001 From: jao Date: Tue, 17 Jan 2023 01:31:31 +0000 Subject: better activation of symbol-overlay commands --- init.el | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) diff --git a/init.el b/init.el index c5492c8..0ef8d31 100644 --- a/init.el +++ b/init.el @@ -1903,9 +1903,20 @@ (defun jao-symbol-reveal (&rest _) (when outline-minor-mode (outline-show-entry))) (advice-add 'symbol-overlay-basic-jump :after 'jao-symbol-reveal) + + (defun jao-symbol-put-and-next () + (interactive) + (symbol-overlay-put) + (symbol-overlay-jump-next)) + + (defun jao-symbol-put-and-prev () + (interactive) + (symbol-overlay-put) + (symbol-overlay-jump-prev)) + :bind (:map prog-mode-map (("M-i" . symbol-overlay-put) - ("M-n" . symbol-overlay-switch-forward) - ("M-p" . symbol-overlay-switch-backward))) + ("M-n" . jao-symbol-put-and-next) + ("M-p" . jao-symbol-put-and-prev))) :hook (prog-mode . symbol-overlay-mode) :diminish " ^") -- cgit v1.2.3