r27256 - /trunk/dh-make-perl/dh-make-perl

dmn at users.alioth.debian.org dmn at users.alioth.debian.org
Tue Nov 25 08:39:08 UTC 2008


Author: dmn
Date: Tue Nov 25 08:39:05 2008
New Revision: 27256

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27256
Log:
Updated extract_name_ver_from_makefile to handle M::I recommended syntax.

    * This patch only fixes extraction of names.
    * Version extraction tweaks not made in this commit.

Modified:
    trunk/dh-make-perl/dh-make-perl

Modified: trunk/dh-make-perl/dh-make-perl
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/dh-make-perl?rev=27256&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Tue Nov 25 08:39:05 2008
@@ -614,13 +614,16 @@
         $name = $4;
     }
     elsif (
-        $file =~ /name
-		 \s*
-		 \(?
-		     ([\'\"]?)
-		         (\S+)
-		     \1
-		 \)?;/xs
+        $file =~ m{
+                        name
+                         \s*
+                         \(?                    # Optional open paren
+                             ([\'\"]?)          # Optional open quote
+                                 (\S+)          # Quoted name
+                             \1                 # Optional close quote
+                         \)?                    # Optional close paren
+                         \s*;
+                 }xs
         )
     {
 




More information about the Pkg-perl-cvs-commits mailing list