Bug#342751: [PATCH] make required debs from module dependency

[Junji Sawada]

Package: dh-make-perl
Version: 0.20
Severity: wishlist
Tags: patch

Hi,

I implemented dh-make-perl-all which reads dh-make-perl output and makes
all non-debian modules.

I'm glad if you accept this patch.

-- System Information:
Debian Release: testing/unstable
  APT prefers unstable
  APT policy: (500, 'unstable')
Architecture: i386 (i686)
Shell:  /bin/sh linked to /bin/bash
Kernel: Linux 2.6.14
Locale: LANG=ja_JP.eucJP, LC_CTYPE=ja_JP.eucJP (charmap=EUC-JP)

Versions of packages dh-make-perl depends on:
ii  debhelper                     5.0.9      helper programs for debian/rules
ii  dpkg-dev                      1.13.11    package building tools for Debian
ii  fakeroot                      1.5.5      Gives a fake root environment
ii  libmodule-depends-perl        0.10-1     identify the dependencies of a dis
ii  libyaml-perl                  0.39-1     YAML Ain't Markup Language (tm)
ii  make                          3.80-12    The GNU version of the "make" util
ii  perl                          5.8.7-8    Larry Wall's Practical Extraction 
ii  perl-modules [libpod-parser-p 5.8.7-8    Core Perl modules

Versions of packages dh-make-perl recommends:
ii  apt-file                      2.0.6      APT package searching utility -- c
ii  libmodule-build-perl          0.26-1     Subclassable and make-independant 

-- no debconf information

--- dh-make-perl.orig/dh-make-perl      2005-12-10 12:42:43.000000000 +0900
+++ dh-make-perl/dh-make-perl   2005-12-10 12:44:16.000000000 +0900
@@ -151,6 +151,8 @@
 my $debiandir;
 my $startdir = getcwd();
 my $dh_compat = 4;
+my $cachedir = '/var/cache/apt';
+my $sourceslist = '/etc/apt/sources.list';
 
 our %overrides;
 my $datadir = '/usr/share/dh-make-perl';
@@ -182,6 +184,8 @@
        "install!" => \$install,
        "notest" => \$notest,
        "nometa" => \$nometa,
+       "cachedir=s" => \$cachedir,
+       "sourceslist=s" => \$sourceslist,
        ) || die <<"USAGE";
 Usage:
 $0 [ --build ] [ --install ] [ SOURCE_DIR | --cpan MODULE ]
@@ -584,7 +588,7 @@
                        print "Searching for $module package using apt-file.\n";
                        $module =~ s|::|/|g;
 
-                       my @search = `apt-file search $module.pm`;
+                       my @search = `apt-file search --cache $cachedir 
--sources-list $sourceslist $module.pm`;
 
                        # Regex's to search the return of apt-file to find the 
right pkg
                        my $ls  = '(?:lib|share)';

dh-make-perl-all
Description: Perl program

make-apt-repository
Description: application/shellscript