From de1c98ef0ca62838da26e3f7f1f7d89ae923b084 Mon Sep 17 00:00:00 2001 From: Stefan Kangas Date: Mon, 1 Aug 2022 18:15:51 +0200 Subject: Prefer command remapping to substitute-key-definition * lisp/textmodes/reftex-index.el (reftex-index-mode-map): * lisp/textmodes/reftex-sel.el (reftex-select-shared-map): * lisp/textmodes/reftex-toc.el (reftex-toc-mode-map): Prefer command remapping to 'substitute-key-definition'. --- lisp/textmodes/reftex-sel.el | 12 ++++-------- 1 file changed, 4 insertions(+), 8 deletions(-) (limited to 'lisp/textmodes/reftex-sel.el') diff --git a/lisp/textmodes/reftex-sel.el b/lisp/textmodes/reftex-sel.el index 5942801a8a9..80c01948e5a 100644 --- a/lisp/textmodes/reftex-sel.el +++ b/lisp/textmodes/reftex-sel.el @@ -33,14 +33,10 @@ (defvar reftex-select-shared-map (let ((map (make-sparse-keymap))) (set-keymap-parent map special-mode-map) - (substitute-key-definition - #'next-line #'reftex-select-next map global-map) - (substitute-key-definition - #'previous-line #'reftex-select-previous map global-map) - (substitute-key-definition - #'keyboard-quit #'reftex-select-keyboard-quit map global-map) - (substitute-key-definition - #'newline #'reftex-select-accept map global-map) + (define-key map [remap next-line] #'reftex-select-next) + (define-key map [remap previous-line] #'reftex-select-previous) + (define-key map [remap keyboard-quit] #'reftex-select-keyboard-quit) + (define-key map [remap newline] #'reftex-select-accept) (define-key map " " #'reftex-select-callback) (define-key map "n" #'reftex-select-next) -- cgit v1.2.3