diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-10-05 10:34:37 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-10-05 10:34:37 +0200 |
| commit | 4103123806311aa42f8ee22082015c0a7c3e30dd (patch) | |
| tree | 027f0e6a14ed49fe4842fe5a5243d35dc84f40b3 /lisp/gnus/gnus-html.el | |
| parent | 947aee281c1f6d891a5770e70735697fe3c3e1a7 (diff) | |
| download | emacs-4103123806311aa42f8ee22082015c0a7c3e30dd.tar.gz emacs-4103123806311aa42f8ee22082015c0a7c3e30dd.tar.bz2 emacs-4103123806311aa42f8ee22082015c0a7c3e30dd.zip | |
Change the call convention for `defvar-keymap'
* doc/lispref/keymaps.texi (Changing Key Bindings): Adjust
documentation.
* lisp/simple.el (special-mode-map):
* lisp/net/shr.el (shr-map):
* lisp/net/eww.el (eww-link-keymap):
(eww-mode-map):
(eww-submit-map):
(eww-textarea-map):
(eww-bookmark-mode-map):
(eww-history-mode-map):
(eww-buffers-mode-map):
* lisp/gnus/message.el (message-mode-map):
* lisp/gnus/gnus-html.el (gnus-html-image-map):
* lisp/gnus/gnus-eform.el (gnus-edit-form-mode-map):
* lisp/gnus/gnus-dired.el (gnus-dired-mode-map):
* lisp/gnus/gnus-bookmark.el (gnus-bookmark-bmenu-mode-map):
Adjust usage of `defvar-keymap'.
* lisp/subr.el (define-keymap, define-keymap--define): Change how
these functions call each other.
(defvar-keymap): Change interface to be more like `define-keymap'.
* lisp/emacs-lisp/lisp-mode.el (lisp-indent--defvar-keymap): Remove.
(lisp-indent-function): Don't use it.
Diffstat (limited to 'lisp/gnus/gnus-html.el')
| -rw-r--r-- | lisp/gnus/gnus-html.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el index e9fa819d0b5..c1815d3486c 100644 --- a/lisp/gnus/gnus-html.el +++ b/lisp/gnus/gnus-html.el @@ -71,12 +71,12 @@ fit these criteria." :group 'gnus-art :type 'float) -(defvar-keymap gnus-html-image-map () +(defvar-keymap gnus-html-image-map "u" #'gnus-article-copy-string "i" #'gnus-html-insert-image "v" #'gnus-html-browse-url) -(defvar-keymap gnus-html-displayed-image-map () +(defvar-keymap gnus-html-displayed-image-map "a" #'gnus-html-show-alt-text "i" #'gnus-html-browse-image "\r" #'gnus-html-browse-url |