From f99219a533203a46b2395d6b6021763b1542afd6 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 12 Aug 2022 17:44:51 +0200 Subject: [PATCH] Fix emacs-news-view-mode-map inheritance * lisp/textmodes/emacs-news-mode.el (emacs-news-view-mode-map): Fix inheritance from `special-mode-map' (bug#57100). --- lisp/textmodes/emacs-news-mode.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/textmodes/emacs-news-mode.el b/lisp/textmodes/emacs-news-mode.el index e6e1f037284..9afa7ead98d 100644 --- a/lisp/textmodes/emacs-news-mode.el +++ b/lisp/textmodes/emacs-news-mode.el @@ -59,9 +59,12 @@ "C-x C-q" #'emacs-news-view-mode " " #'emacs-news-open-line) -(defvar-keymap emacs-news-view-mode-map - :parent emacs-news-common-map - "C-x C-q" #'emacs-news-mode) +(defvar emacs-news-view-mode-map + ;; This is defined this way instead of inheriting because we're + ;; deriving the mode from `special-mode' and want the keys from there. + (let ((map (copy-keymap emacs-news-common-map))) + (keymap-set map "C-x C-q" #'emacs-news-mode) + map)) (defvar emacs-news-mode-font-lock-keywords `(("^---$" 0 'emacs-news-does-not-need-documentation) -- 2.39.5