[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/05: build-aux: Relax the regexp used to match NEWS sections.
From: |
guix-commits |
Subject: |
01/05: build-aux: Relax the regexp used to match NEWS sections. |
Date: |
Sun, 18 Apr 2021 17:18:38 -0400 (EDT) |
apteryx pushed a commit to branch version-1.3.0
in repository guix.
commit a61c43a6573fdb2f1de4b13711a80d8c4754e960
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Sun Apr 18 09:58:31 2021 -0400
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.
---
build-aux/update-NEWS.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/build-aux/update-NEWS.scm b/build-aux/update-NEWS.scm
index a05ecad..e916f3f 100644
--- a/build-aux/update-NEWS.scm
+++ b/build-aux/update-NEWS.scm
@@ -95,7 +95,7 @@ paragraph."
(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 @@ paragraph."
(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