emacs/gnu.emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2026-09-10 07:46:51 -04:00
Code Issues Actions Packages Projects Releases Wiki Activity

Relax formatting requirements on NEWS when converting to HTML

Browse source 
* admin/admin.el (make-news-html-file): Accurately detect blocks
even when not separated by blank lines.

Copyright-paperwork-exempt: yes
This commit is contained in:
Peter Oliver 2026-09-01 13:54:35 +01:00 committed by Sean Whitton
parent fe4b9df4f4
commit 5fdb5e3485
1 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
admin/admin.el
View file

@ -947,11 +947,15 @@ $Date: %s $
;; Format code blocks.
(while (re-search-forward "^ " nil t)
(let ((elisp-block (looking-at "(")))
(backward-paragraph)
(let ((paragraph-start "^ "))
(backward-paragraph))
(unless (looking-at paragraph-separate)
(save-excursion (insert "\n")))
(insert (if elisp-block
"\n#+BEGIN_SRC emacs-lisp"
"\n#+BEGIN_EXAMPLE"))
(forward-paragraph)
(let ((paragraph-start "^[^ ]"))
(forward-paragraph))
(insert (if elisp-block
"#+END_SRC\n"
"#+END_EXAMPLE\n"))))