r53108 - /trunk/dh-make-perl/lib/DhMakePerl.pm
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sat Feb 20 21:22:20 UTC 2010
Author: dmn
Date: Sat Feb 20 21:22:14 2010
New Revision: 53108
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=53108
Log:
drop package lexical $closes
Modified:
trunk/dh-make-perl/lib/DhMakePerl.pm
Modified: trunk/dh-make-perl/lib/DhMakePerl.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/DhMakePerl.pm?rev=53108&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl.pm Sat Feb 20 21:22:14 2010
@@ -77,7 +77,7 @@
# * get more info from the package (maybe using CPAN methods)
my (
- $closes, $date,
+ $date,
$startdir,
);
our %overrides;
@@ -409,13 +409,8 @@
$self->create_control( $self->debian_file('control') );
$self->write_source_format(
catfile( $self->debian_dir, 'source', 'format' ) );
- if ( defined $self->cfg->closes ) {
- $closes = $self->cfg->closes;
- }
- else {
- $closes = $self->get_wnpp($pkgname);
- }
- $self->create_changelog( $self->debian_file('changelog'), $closes );
+ $self->create_changelog( $self->debian_file('changelog'),
+ $self->cfg->closes // $self->get_wnpp($pkgname) );
$self->create_rules( $self->debian_file('rules') );
$self->create_compat( $self->debian_file('compat') );
$self->create_watch( $self->debian_file('watch') ) if $upsurl;
More information about the Pkg-perl-cvs-commits
mailing list