mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Convert some keymaps to defvar-keymap

Browse source 
* 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-bookmark-mode-map):
(eww-history-mode-map):
(eww-buffers-mode-map):
* lisp/gnus/message.el (message-mode-map): Use defvar-keymap.

* 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): Use
defvar-keymap.

* lisp/gnus/gnus-group.el (gnus-group-mode-map): Use define-keymap.

* lisp/gnus/gnus-html.el (gnus-html-image-map): Use defvar-keymap.

* lisp/gnus/gnus.el: Autoload gnus-score-edit-all-score.
This commit is contained in:
Lars Ingebrigtsen 2021-10-04 10:15:04 +02:00
parent 192f9357f2
commit 859190f03e
10 changed files with 433 additions and 493 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lisp/gnus/gnus-eform.el
View file

@ -48,13 +48,9 @@
(defvar gnus-edit-form-buffer "*Gnus edit form*")
(defvar gnus-edit-form-done-function nil)
(defvar gnus-edit-form-mode-map
(let ((map (make-sparse-keymap)))
(set-keymap-parent map emacs-lisp-mode-map)
(gnus-define-keys map
"\C-c\C-c" gnus-edit-form-done
"\C-c\C-k" gnus-edit-form-exit)
map))
(defvar-keymap gnus-edit-form-mode-map (:parent emacs-lisp-mode-map)
"\C-c\C-c" #'gnus-edit-form-done
"\C-c\C-k" #'gnus-edit-form-exit)
(defun gnus-edit-form-make-menu-bar ()
(unless (boundp 'gnus-edit-form-menu)