From 18dc8c6f0f76b8d128638105eebad2895f9857f0 Mon Sep 17 00:00:00 2001 From: Maxim Cournoyer Date: Sun, 18 Apr 2021 09:58:31 -0400 Subject: 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) : 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(-) (limited to 'build-aux') diff --git a/build-aux/update-NEWS.scm b/build-aux/update-NEWS.scm index a05ecad091..e916f3f1e8 100644 --- a/build-aux/update-NEWS.scm +++ b/build-aux/update-NEWS.scm @@ -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 -- cgit v1.2.3