diff options
| author | Juri Linkov <juri@linkov.net> | 2022-08-30 20:09:20 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2022-08-30 20:09:20 +0300 |
| commit | 7804536e4e6dd7fa57d38b9b6c6835ae316bff50 (patch) | |
| tree | f105e0bc8439d965f4fb5ec901e22c8b8a4ed4a9 /lisp/textmodes/emacs-news-mode.el | |
| parent | e1e60e51bf324aaa2137075827c4d08a331a7bef (diff) | |
| download | emacs-7804536e4e6dd7fa57d38b9b6c6835ae316bff50.tar.gz emacs-7804536e4e6dd7fa57d38b9b6c6835ae316bff50.tar.bz2 emacs-7804536e4e6dd7fa57d38b9b6c6835ae316bff50.zip | |
Fix 744ed0ceeed7472a160fea7154939cf641205577 from bug#57082 (bug#57176)
* lisp/outline.el (outline-minor-mode-highlight-buffer): Handle 'append'.
(outline-minor-mode): Call outline--fix-up-all-buttons when font-lock is used.
* lisp/textmodes/emacs-news-mode.el (emacs-news--mode-common): Fix regexp.
Diffstat (limited to 'lisp/textmodes/emacs-news-mode.el')
| -rw-r--r-- | lisp/textmodes/emacs-news-mode.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/textmodes/emacs-news-mode.el b/lisp/textmodes/emacs-news-mode.el index 022e17c9343..6bf96deaccb 100644 --- a/lisp/textmodes/emacs-news-mode.el +++ b/lisp/textmodes/emacs-news-mode.el @@ -73,9 +73,11 @@ (defun emacs-news--mode-common () (setq-local font-lock-defaults '(emacs-news-mode-font-lock-keywords t)) - (setq-local outline-regexp "\\(:? +\\)?\\(\\*+\\) " + ;; This `outline-regexp' matches leading spaces inserted + ;; by the current implementation of `outline-minor-mode-use-buttons'. + (setq-local outline-regexp "\\(?: +\\)?\\(\\*+\\) " + outline-level (lambda () (length (match-string 1))) outline-minor-mode-cycle t - outline-level (lambda () (length (match-string 2))) outline-minor-mode-highlight 'append) (outline-minor-mode) (emacs-etc--hide-local-variables)) |