File 0001-Fix-deprecation-warning-in-5.18-about-splitting-in-r.patch of Package perl-Config-General
Origin: CPAN RT
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=85132
Bug-Debian: http://bugs.debian.org/709769
From 1e66362a9a011022737b0b7a3214d666505461ec Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?"D.=20Ilmari=20Manns=C3=A5ker"?=
<ilmari.mannsaker@net-a-porter.com>
Date: Wed, 8 May 2013 09:53:33 +0100
Subject: [PATCH] Fix deprecation warning in 5.18 about splitting (? in regex
---
General/Interpolated.pm | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/General/Interpolated.pm b/General/Interpolated.pm
index df7f6e3..bb2d861 100644
--- a/General/Interpolated.pm
+++ b/General/Interpolated.pm
@@ -48,8 +48,7 @@ sub _set_regex {
\$ # dollar sign
(\{)? # $2: optional opening curly
([a-zA-Z0-9_\-\.:\+,]+) # $3: capturing variable name (fix of #33447)
- (
- ?(2) # $4: if there's the opening curly...
+ (?(2) # $4: if there's the opening curly...
\} # ... match closing curly
)
}x;
--
1.7.9.5