build-aux: Relax the regexp used to match NEWS sections.
A number of packages doesn't really make sense in the name of the section to be substituted. This change allows using simply '*** new packages' instead of '*** 1999 new packages', for example, and have the update-NEWS.scm script update it. * build-aux/update-NEWS.scm (write-packages-added) <regexp>: Do not care about leading white space in the name of the section.
This commit is contained in:
parent
87c0d6265c
commit
18dc8c6f0f
1 changed files with 2 additions and 2 deletions
|
@ -95,7 +95,7 @@ (define (write-packages-added news-file old new)
|
|||
(with-atomic-file-replacement news-file
|
||||
(lambda (input output)
|
||||
(rewrite-org-section input output
|
||||
(make-regexp "^(\\*+) (.*) new packages")
|
||||
(make-regexp "^(\\*+).*new packages")
|
||||
(lambda (match port)
|
||||
(let ((stars (match:substring match 1)))
|
||||
(format port
|
||||
|
@ -141,7 +141,7 @@ (define important
|
|||
(with-atomic-file-replacement news-file
|
||||
(lambda (input output)
|
||||
(rewrite-org-section input output
|
||||
(make-regexp "^(\\*+) (.*) package updates")
|
||||
(make-regexp "^(\\*+).*package updates")
|
||||
(lambda (match port)
|
||||
(let ((stars (match:substring match 1))
|
||||
(lst (map (match-lambda
|
||||
|
|
Loading…
Reference in a new issue