Package: dh-make-perl
Version: 0.17
Tags: patch

I install and update the perl module WWW::Search::Ebay with dh-make-perl.

dh-make-perl has never been able to automatically figure out the package's
name and version (always producing a .deb named "lib-perl_0-1_all.deb"), so
I'm submitting my two-line change that aids this.

WWW::Search::Ebay defines its name and version in Makefile.PL in this way:

---snip---
# $rcs = ' $Id: Makefile.PL,v 1.25 2005/05/19 03:05:51 Daddy Exp $ ';

use inc::Module::Install;

name('WWW-Search-Ebay');
author('Martin Thurn <[EMAIL_ADDRESS_OBSCURED]>');
license('perl');
version(2.207);
---snip---

Here is my two-line addition to deal with this.  I hope this is useful
for others.

--- /old/dh-make-perl   2005-05-18 09:45:27.000000000 -0500
+++ /new/dh-make-perl   2005-07-06 20:31:04.000000000 -0500
@@ -375,7 +375,9 @@
         close(MF);
     $name = $4 if $file =~ /(['"]?)DISTNAME\1\s*(=>|,)\s*(['"]?)(\S+)\3/s;
     $name = $4 if ! $name && $file =~
/(['"]?)NAME\1\s*(=>|,)\s*(['"]?)(\S+)\3/s;
+    $name = $2 if ! $name && $file =~ /name\((['"]?)(\S+)\1\);/s;
         $ver = $4 if $file =~ /(['"]?)VERSION\1\s*(=>|,)\s*(['"]?)(\S+)\3/s;
+        $ver = $1 if ! $ver && $file =~ /version\((\S+)\)/s;
         $vfrom = $4 if $file =~
/(['"]?)VERSION_FROM\1\s*(=>|,)\s*(['"]?)(\S+)\3/s;
         $dir = dirname($makefile) || './';
         $name =~ s/,.*$//;

-- 
Troy

Reply via email to