summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2021-11-17 08:34:32 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2021-11-17 08:34:35 +0100
commitcde5dcd441b5db79f39b8664221866566c400b05 (patch)
tree5544dd4a8e45909607b0b537a5e3d417f838644a /lisp/emacs-lisp
parent249095fd6778b9014ff30381ca562f40107d7be4 (diff)
downloademacs-cde5dcd441b5db79f39b8664221866566c400b05.tar.gz
emacs-cde5dcd441b5db79f39b8664221866566c400b05.tar.bz2
emacs-cde5dcd441b5db79f39b8664221866566c400b05.zip
Change the call signature to keymap-substitute
* lisp/keymap.el (keymap-substitute): Make the keymap the first parameter for symmetry with the other functions. * lisp/emacs-lisp/shortdoc.el (keymaps): * lisp/emacs-lisp/bytecomp.el (lambda): Adjust.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/bytecomp.el2
-rw-r--r--lisp/emacs-lisp/shortdoc.el2
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el
index 4078a7314f3..3338c383171 100644
--- a/lisp/emacs-lisp/bytecomp.el
+++ b/lisp/emacs-lisp/bytecomp.el
@@ -5066,7 +5066,7 @@ binding slots have been popped."
(keymap-unset 2)
(keymap-global-unset 1)
(keymap-local-unset 1)
- (keymap-substitute 1 2)
+ (keymap-substitute 2 3)
(keymap-set-after 2)
(key-translate 1 2)
(keymap-lookup 2)
diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el
index 228d1e05513..157209fcf74 100644
--- a/lisp/emacs-lisp/shortdoc.el
+++ b/lisp/emacs-lisp/shortdoc.el
@@ -1242,7 +1242,7 @@ There can be any number of :example/:result elements."
(keymap-global-unset
:no-eval (keymap-global-unset "C-c C-c"))
(keymap-substitute
- :no-eval (keymap-substitute "C-c C-c" "M-a" map))
+ :no-eval (keymap-substitute map "C-c C-c" "M-a"))
(keymap-set-after
:no-eval (keymap-set-after map "<separator-2>" menu-bar-separator))
"Predicates"