From: Stefan Monnier Date: Mon, 17 Sep 2018 03:54:04 +0000 (-0400) Subject: * lisp/delsel.el (minibuffer-keyboard-quit): Remove old redundant code. X-Git-Tag: emacs-27.0.90~4402 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=75ab41d00d97c4de1ca343ce5273d1aad4975f37;p=emacs.git * 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. --- 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))