mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-26 10:49:33 +00:00
Code Issues Releases Activity

Tweak format of list of old files in NEWS header

Browse Source 
* etc/NEWS: Stop list of old NEWS files growing without limit.
* admin/admin.el (set-version): Handle either NEWS header format.
This commit is contained in:
Glenn Morris 2017-10-20 19:14:34 -04:00
parent ef3d8505ec
commit 7c63655e39
2 changed files with 17 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
admin/admin.el
View File

@ -158,11 +158,17 @@ Documentation changes might not have been completed!"))))
(re-search-forward "is about changes in Emacs version \\([0-9]+\\)")
(replace-match (number-to-string newmajor) nil nil nil 1)
(re-search-forward "^See files \\(NEWS\\)")
(replace-match (format "NEWS.%s, NEWS" oldmajor) nil nil nil 1)
(let ((start (line-beginning-position)))
(search-forward "in older Emacs versions")
(or (equal start (line-beginning-position))
(fill-region start (line-beginning-position 2))))
(unless (save-match-data
(when (looking-at "\\(\\..*\\), \\(\\.\\.\\.\\|…\\)")
(replace-match
(format ".%s, NEWS.%s" oldmajor (1- oldmajor))
nil nil nil 1)
t))
(replace-match (format "NEWS.%s, NEWS" oldmajor) nil nil nil 1)
(let ((start (line-beginning-position)))
(search-forward "in older Emacs versions")
(or (equal start (line-beginning-position))
(fill-region start (line-beginning-position 2)))))
(re-search-forward "^ $")
(forward-line -1)
(let ((start (point)))
@ -893,3 +899,7 @@ changes (in a non-trivial way). This function does not check for that."
(provide 'admin)
;;; admin.el ends here
;; Local Variables:
;; coding: utf-8
;; End:

4
etc/NEWS
View File

@ -9,8 +9,8 @@ If possible, use M-x report-emacs-bug.
This file is about changes in Emacs version 26.
See file HISTORY for a list of GNU Emacs versions and release dates.
See files NEWS.25, NEWS.24, NEWS.23, NEWS.22, NEWS.21, NEWS.20,
NEWS.19, NEWS.18, and NEWS.1-17 for changes in older Emacs versions.
See files NEWS.25, NEWS.24, ..., NEWS.18, and NEWS.1-17 for changes
in older Emacs versions.
You can narrow news to a specific version by calling 'view-emacs-news'
with a prefix argument or by typing C-u C-h C-n.