From 75ab41d00d97c4de1ca343ce5273d1aad4975f37 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 16 Sep 2018 23:54:04 -0400 Subject: [PATCH] * lisp/delsel.el (minibuffer-keyboard-quit): Remove old redundant code. The various minibuffer maps all inherit from minibuffer-local-map nowadays, so a single binding in it is all it takes. --- lisp/delsel.el | 8 -------- 1 file changed, 8 deletions(-) diff --git a/lisp/delsel.el b/lisp/delsel.el index a3c29349471..9582272d184 100644 --- a/lisp/delsel.el +++ b/lisp/delsel.el @@ -294,18 +294,10 @@ then it takes a second \\[keyboard-quit] to abort the minibuffer." (abort-recursive-edit))) (define-key minibuffer-local-map "\C-g" 'minibuffer-keyboard-quit) -(define-key minibuffer-local-ns-map "\C-g" 'minibuffer-keyboard-quit) -(define-key minibuffer-local-completion-map "\C-g" 'minibuffer-keyboard-quit) -(define-key minibuffer-local-must-match-map "\C-g" 'minibuffer-keyboard-quit) -(define-key minibuffer-local-isearch-map "\C-g" 'minibuffer-keyboard-quit) (defun delsel-unload-function () "Unload the Delete Selection library." (define-key minibuffer-local-map "\C-g" 'abort-recursive-edit) - (define-key minibuffer-local-ns-map "\C-g" 'abort-recursive-edit) - (define-key minibuffer-local-completion-map "\C-g" 'abort-recursive-edit) - (define-key minibuffer-local-must-match-map "\C-g" 'abort-recursive-edit) - (define-key minibuffer-local-isearch-map "\C-g" 'abort-recursive-edit) (dolist (sym '(self-insert-command insert-char quoted-insert yank clipboard-yank insert-register newline-and-indent reindent-then-newline-and-indent newline open-line)) -- 2.39.2