From b6d64af77e176c13c9a04022ef575696dfe7dc20 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Sun, 3 Sep 2017 00:18:04 +0200
Subject: fix regexp for newer perl

The error was:
Unescaped left brace in regex is illegal here in regex; marked by <-- HERE in m/%{ <-- HERE ARCH}/ at /usr/bin/gendistrib line 126.
---
 NEWS       | 1 +
 gendistrib | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index 9399900..bf2da6f 100644
--- a/NEWS
+++ b/NEWS
@@ -1,5 +1,6 @@
 - do not load file sizes from synthesis in non incremental mode (minor
   performance optimisation)
+- fix "Unescaped left brace in regex is illegal here in regex"
 
 Version 7.00 - 7 September 2014, by Thierry Vignaud
 
diff --git a/gendistrib b/gendistrib
index 1f0e0ea..6a2094c 100755
--- a/gendistrib
+++ b/gendistrib
@@ -123,7 +123,7 @@ foreach my $d ($infodir, map { "$_->{path}/media_info" } @hdlists) {
 }
 
 foreach my $e (@hdlists) {
-    if ($e->{dir} =~ /%{ARCH}/) {
+    if ($e->{dir} =~ /%\{ARCH\}/) {
 	die "sorry, %{ARCH} not supported anymore\n";
     }
     @{$e->{files}} = glob("$root/$e->{dir}/*.rpm") or do {
-- 
cgit v1.2.1