[libconfig-model-dpkg-perl] 01/01: C::M::Dpkg::Dependency: escape '{' in regexp (Closes: #789841) ...

[dod at debian.org]

This is an automated email from the git hooks/post-receive script.

dod pushed a commit to branch master
in repository libconfig-model-dpkg-perl.

commit ab49f6b9ab2ed45609b30fbabadf19e4351460da
Author: Dominique Dumont <dod at debian.org>
Date:   Sat Jun 27 19:06:20 2015 +0200

    C::M::Dpkg::Dependency: escape '{' in regexp (Closes: #789841) ...
    
    ... the regexp in question is part of the Parse::RecDescent grammar
    used to parse a dependency. That's why the warning showed up in the
    middle of a gigantic (~3900 lines) eval.
    
    This is required by perl 5.22
---
 lib/Config/Model/Dpkg/Dependency.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Config/Model/Dpkg/Dependency.pm b/lib/Config/Model/Dpkg/Dependency.pm
index 24a4944..653769f 100644
--- a/lib/Config/Model/Dpkg/Dependency.pm
+++ b/lib/Config/Model/Dpkg/Dependency.pm
@@ -181,7 +181,7 @@ dependency: depend(s /\|/) eofile {
 depend: pkg_dep | variable
 
 # For the allowed stuff after ${foo}, see #702792
-variable: /\${[\w:\-]+}[\w\.\-~+]*/
+variable: /\$\{[\w:\-]+\}[\w\.\-~+]*/
 
 pkg_dep: pkg_name dep_version(?) arch_restriction(?) profile_restriction(s?) {
     my $dv = $item[2] ;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libconfig-model-dpkg-perl.git