diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-10-15 14:19:32 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-10-15 14:19:41 +0200 |
| commit | 281f34f9de6f3cf7d731630df9d48d384c3d989d (patch) | |
| tree | f25689af6213f4c732938795a8ef374fe563013b /lisp/vc/cvs-status.el | |
| parent | 705b07660aa39705baf7c6daef4bce0ee7f7b418 (diff) | |
| download | emacs-281f34f9de6f3cf7d731630df9d48d384c3d989d.tar.gz | |
Convert two `easy-mmode-defmap' usages to `defvar-keymap'
* lisp/vc/log-edit.el (log-edit-mode-map):
* lisp/vc/cvs-status.el (cvs-status-mode-map): Convert
`easy-mmode-defmap' to `defvar-keymap'.
Diffstat (limited to 'lisp/vc/cvs-status.el')
| -rw-r--r-- | lisp/vc/cvs-status.el | 27 |
1 files changed, 13 insertions, 14 deletions
diff --git a/lisp/vc/cvs-status.el b/lisp/vc/cvs-status.el index 63b886362ba..6b49690aa42 100644 --- a/lisp/vc/cvs-status.el +++ b/lisp/vc/cvs-status.el @@ -29,23 +29,22 @@ ;;; Code: (require 'cl-lib) -(require 'pcvs-util) +(require 'pcvs) +(require 'easy-mmode) ;;; -(easy-mmode-defmap cvs-status-mode-map - '(("n" . next-line) - ("p" . previous-line) - ("N" . cvs-status-next) - ("P" . cvs-status-prev) - ("\M-n" . cvs-status-next) - ("\M-p" . cvs-status-prev) - ("t" . cvs-status-cvstrees) - ("T" . cvs-status-trees) - (">" . cvs-mode-checkout)) - "CVS-Status' keymap." - :group 'cvs-status - :inherit 'cvs-mode-map) +(defvar-keymap cvs-status-mode-map + :inherit 'cvs-mode-map + "n" #'next-line + "p" #'previous-line + "N" #'cvs-status-next + "P" #'cvs-status-prev + (kbd "M-n") #'cvs-status-next + (kbd "M-p") #'cvs-status-prev + "t" #'cvs-status-cvstrees + "T" #'cvs-status-trees + ">" #'cvs-mode-checkout) ;;(easy-menu-define cvs-status-menu cvs-status-mode-map ;; "Menu for `cvs-status-mode'." |