[rt.cpan.org #114552] Unescaped left brace in regex is illegal in regex

------------=_1495274111-9926-6
Content-Transfer-Encoding: 8bit
Content-Type: text/plain; charset="utf-8"

Sat May 20 05:55:10 2017: Request 114552 was acted upon.
Transaction: Correspondence added by GREGOA
       Queue: Wx
     Subject: Unescaped left brace in regex is illegal in regex
   Broken in: 0.9928
    Severity: (no value)
       Owner: Nobody
  Requestors: [email protected]
      Status: new
 Ticket <URL: https://rt.cpan.org/Ticket/Display.html?id=114552 >


Trivial patch attached.


------------=_1495274111-9926-6
Content-Type: text/x-diff; name="unescaped_left_brace.patch"
Content-Disposition: inline; filename="unescaped_left_brace.patch"
Content-Transfer-Encoding: 7bit
RT-Attachment: 114552/1728546/929412

Description: fix "Unescaped left brace" warning, which is fatal in 5.25.x
Origin: vendor
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=115103
Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=826463
Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=115103
Author: gregor herrmann <[email protected]>
Last-Update: 2017-05-20

--- a/build/Wx/build/Utils.pm
+++ b/build/Wx/build/Utils.pm
@@ -107,7 +107,7 @@
     m/^\s*INCLUDE:\s+(.*)$/ and $file = $1 and $arr = \@xsinclude;
     m/^\s*INCLUDE_COMMAND:\s+.*\s(\S+\.(?:xsp?|h))\s*/ and $file = $1 and
       $arr = \@xsinclude;
-    m/^\s*\%include{([^}]+)}\s*;\s*$/ and $file = $1 and $arr = \@xsinclude;
+    m/^\s*\%include\{([^}]+)}\s*;\s*$/ and $file = $1 and $arr = \@xsinclude;
 
     if( defined $file ) {
       $file = catfile( split '/', $file );

------------=_1495274111-9926-6--