r27347 - /trunk/dh-make-perl/dh-make-perl
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Thu Nov 27 09:51:55 UTC 2008
Author: dmn
Date: Thu Nov 27 09:51:53 2008
New Revision: 27347
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=27347
Log:
add --sources-list command-line option
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=27347&op=diff
==============================================================================
--- trunk/dh-make-perl/dh-make-perl (original)
+++ trunk/dh-make-perl/dh-make-perl Thu Nov 27 09:51:53 2008
@@ -478,7 +478,10 @@
my ($module_build);
my ( @docs, @examples, $changelog, @args );
-my %opts = ( 'dh' => 7, dist => '{sid,unstable}' );
+my %opts = (
+ 'dh' => 7, dist => '{sid,unstable}',
+ 'sources-list' => '/etc/apt/sources.list',
+);
my $mod_cpan_version;
@@ -583,8 +586,9 @@
"The directory $debiandir is already present and I won't overwrite it: remove it yourself.\n";
my $apt_contents = AptContents->new({
- homedir => $homedir,
- dist => $opts{dist},
+ homedir => $homedir,
+ dist => $opts{dist},
+ sources_file => $opts{'sources-list'},
});
push @depends, Dep->new('${shlib:Depends}') if $arch eq 'any';
@@ -669,7 +673,7 @@
[ --requiredeps ] [ --core-ok ] [ --basepkgs PKGSLIST ]
[ --closes ITPBUG ] [ --packagename|-p PACKAGENAME ]
[ --email|-e EMAIL ] [ --pkg-perl ] [ --dh <ver> ]
- [ --dist <pattern> ]
+ [ --sources-list file ] [ --dist <pattern> ]
USAGE
}
@@ -2101,6 +2105,15 @@
documentation and examples are listed in additional files under debian/, instead
of being listed in debian/rules
+=item B<--sources-list file>
+
+Instruct the C<Contents> file parser to use this B<file> when determining if a
+given file should be parsed or not. Contents files not matching any line in
+B<sources.list> are not parsed in order to save you time parsing old files from
+mirrors you no longer use.
+
+Default: C</etc/aptp/sources.list>
+
=item B<--dist pattern>
Limit the distributions whose C<Contents> files are parsed. The argument is a shell pattern.
More information about the Pkg-perl-cvs-commits
mailing list