Skip to content

Commit ab7c40e

Browse files
committed
Fix Imenu in 'emacs-news-view-mode'
* lisp/textmodes/emacs-news-mode.el (emacs-news-view-mode): Make it derived from emacs-news-mode. Add useful key bindings. (Bug#72080)
1 parent ea30ffc commit ab7c40e

File tree

1 file changed

+11
-2
lines changed

1 file changed

+11
-2
lines changed

lisp/textmodes/emacs-news-mode.el

Lines changed: 11 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -107,12 +107,21 @@
107107
(emacs-news--mode-common))
108108

109109
;;;###autoload
110-
(define-derived-mode emacs-news-view-mode special-mode "NEWS"
110+
(define-derived-mode emacs-news-view-mode emacs-news-mode "NEWS"
111111
"Major mode for viewing the Emacs NEWS file."
112112
(setq buffer-read-only t)
113113
(emacs-news--buttonize)
114114
(button-mode)
115-
(emacs-news--mode-common))
115+
;; Bind useful browsing keys.
116+
(keymap-local-set "q" 'quit-window)
117+
(keymap-local-set "SPC" 'scroll-up-command)
118+
(keymap-local-set "S-SPC" 'scroll-down-command)
119+
(keymap-local-set "DEL" 'scroll-down-command)
120+
(keymap-local-set "?" 'describe-mode)
121+
(keymap-local-set "h" 'describe-mode)
122+
(keymap-local-set ">" 'end-of-buffer)
123+
(keymap-local-set "<" 'beginning-of-buffer)
124+
(keymap-local-set "g" 'revert-buffer))
116125

117126
(defun emacs-news--fill-paragraph (&optional justify)
118127
(cond

0 commit comments

Comments
 (0)