diff options
| author | Glenn Morris | 2021-01-04 07:50:22 -0800 |
|---|---|---|
| committer | Glenn Morris | 2021-01-04 07:50:22 -0800 |
| commit | 6f0bb2fe589e6b42666640d290e2e82ac24c8583 (patch) | |
| tree | 5f94be403916ca05a72dcb5e32174315924633b4 | |
| parent | dadffdd81fdc958e212f64277a5733b79a80dc57 (diff) | |
| parent | 7384ec6416cbcea12a65db058e5a65e40d3a157f (diff) | |
| download | emacs-6f0bb2fe589e6b42666640d290e2e82ac24c8583.tar.gz emacs-6f0bb2fe589e6b42666640d290e2e82ac24c8583.zip | |
Merge from origin/emacs-27
7384ec6416 Add warning comments abound binding keys in Isearch maps
| -rw-r--r-- | lisp/isearch.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/isearch.el b/lisp/isearch.el index fefdd16d25b..67cc7bed15b 100644 --- a/lisp/isearch.el +++ b/lisp/isearch.el | |||
| @@ -669,6 +669,10 @@ This is like `describe-bindings', but displays only Isearch keys." | |||
| 669 | (if isearch-success 'isearch-abort binding)))) | 669 | (if isearch-success 'isearch-abort binding)))) |
| 670 | map)) | 670 | map)) |
| 671 | 671 | ||
| 672 | ;; Note: Before adding more key bindings to this map, please keep in | ||
| 673 | ;; mind that any unbound key exits Isearch and runs the command bound | ||
| 674 | ;; to it in the local or global map. So in effect every key unbound | ||
| 675 | ;; in this map is implicitly bound. | ||
| 672 | (defvar isearch-mode-map | 676 | (defvar isearch-mode-map |
| 673 | (let ((i 0) | 677 | (let ((i 0) |
| 674 | (map (make-keymap))) | 678 | (map (make-keymap))) |
| @@ -834,6 +838,10 @@ This is like `describe-bindings', but displays only Isearch keys." | |||
| 834 | :image '(isearch-tool-bar-image "left-arrow"))) | 838 | :image '(isearch-tool-bar-image "left-arrow"))) |
| 835 | map)) | 839 | map)) |
| 836 | 840 | ||
| 841 | ;; Note: Before adding more key bindings to this map, please keep in | ||
| 842 | ;; mind that any unbound key exits Isearch and runs the command bound | ||
| 843 | ;; to it in the local or global map. So in effect every key unbound | ||
| 844 | ;; in this map is implicitly bound. | ||
| 837 | (defvar minibuffer-local-isearch-map | 845 | (defvar minibuffer-local-isearch-map |
| 838 | (let ((map (make-sparse-keymap))) | 846 | (let ((map (make-sparse-keymap))) |
| 839 | (set-keymap-parent map minibuffer-local-map) | 847 | (set-keymap-parent map minibuffer-local-map) |