mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Make 'emacs-news-cycle-tag' work at all levels

Browse source 
* lisp/textmodes/emacs-news-mode.el (emacs-news-cycle-tag): Search for
a heading starting with 2 or more '*' rather than exactly 3.
* test/lisp/textmodes/emacs-news-mode-resources/cycle-tag.erts
(Point-Char): Add tests for 2 and 4 '*' levels.
This commit is contained in:
Robert Pluim 2023-02-21 15:20:56 +01:00
parent 16ca258b1f
commit 1976ca1634
2 changed files with 92 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/textmodes/emacs-news-mode.el
View file

@ -195,7 +195,9 @@ untagged NEWS entry."
(goto-char (line-beginning-position))
(cond ((or (looking-at (rx bol (or "---" "+++") eol)))
(forward-line 2))
((or (looking-at (rx bol "*** ")))
((or (looking-at (rx bol "**"
(zero-or-more "*")
" ")))
(forward-line 1)))
(outline-previous-visible-heading 1)
(forward-line -1)