From 394462fb627313899fc786a49afec35bd7090427 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Buclin?= <LpSolit@netscape.net>
Date: Fri, 4 Aug 2017 00:43:05 +0200
Subject: Escape left brace in regular expression to make Perl 5.26 happy

---
 t/010dependencies.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/010dependencies.t b/t/010dependencies.t
index afd29a652..f565554d8 100644
--- a/t/010dependencies.t
+++ b/t/010dependencies.t
@@ -69,7 +69,7 @@ foreach my $module (keys %mods) {
             $used =~ s#/#::#g;
             $used =~ s#\.pm$##;
             $used =~ s#\$module#[^:]+#;
-            $used =~ s#\${[^}]+}#[^:]+#;
+            $used =~ s#\$\{[^}]+}#[^:]+#;
             $used =~ s#[" ]##g;
             push(@use, grep(/^\Q$used\E$/, keys %mods));
         }
-- 
cgit v1.2.1