summaryrefslogtreecommitdiff
path: root/lisp/textmodes/emacs-news-mode.el
diff options
context:
space:
mode:
authorStephen Berman <stephen.berman@gmx.net>2022-08-09 20:21:09 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2022-08-09 20:44:07 +0200
commit744ed0ceeed7472a160fea7154939cf641205577 (patch)
tree733a28b74f8c036805b5fece3f3d05d660384a8d /lisp/textmodes/emacs-news-mode.el
parent38f9d9bf060e08f3fe5edab9a13bc7eaabe7e2f1 (diff)
downloademacs-744ed0ceeed7472a160fea7154939cf641205577.tar.gz
emacs-744ed0ceeed7472a160fea7154939cf641205577.tar.bz2
emacs-744ed0ceeed7472a160fea7154939cf641205577.zip
Make outline buttons work in NEWS
* lisp/outline.el (outline-minor-mode-highlight-buffer): Fix button insertion. (outline-minor-mode): Ditto. (outline--insert-open-button): Don't mark buffer as modified when inserting buttons. (outline--insert-close-button): Ditto. * lisp/textmodes/emacs-news-mode.el (emacs-news--mode-common): Adjust outline regexp.
Diffstat (limited to 'lisp/textmodes/emacs-news-mode.el')
-rw-r--r--lisp/textmodes/emacs-news-mode.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/textmodes/emacs-news-mode.el b/lisp/textmodes/emacs-news-mode.el
index c7fa9fa2b2c..e6e1f037284 100644
--- a/lisp/textmodes/emacs-news-mode.el
+++ b/lisp/textmodes/emacs-news-mode.el
@@ -69,11 +69,9 @@
(defun emacs-news--mode-common ()
(setq-local font-lock-defaults '(emacs-news-mode-font-lock-keywords t))
- (setq-local outline-regexp "\\*+ "
+ (setq-local outline-regexp "\\(:? +\\)?\\(\\*+\\) "
outline-minor-mode-cycle t
- ;; We subtract one from the level, because we have a
- ;; space after the asterisks.
- outline-level (lambda () (1- (length (match-string 0))))
+ outline-level (lambda () (length (match-string 2)))
outline-minor-mode-highlight 'append)
(outline-minor-mode))