r53109 - /trunk/dh-make-perl/lib/DhMakePerl.pm
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sat Feb 20 21:22:34 UTC 2010
Author: dmn
Date: Sat Feb 20 21:22:29 2010
New Revision: 53109
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=53109
Log:
drop package lexical $date
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=53109&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl.pm Sat Feb 20 21:22:29 2010
@@ -77,7 +77,6 @@
# * get more info from the package (maybe using CPAN methods)
my (
- $date,
$startdir,
);
our %overrides;
@@ -109,7 +108,6 @@
return $self;
}
-$date = email_date(time);
$startdir = getcwd();
# If we're being required rather than called as a main command, then
@@ -188,8 +186,6 @@
$self->cfg->parse_command_line_options;
$self->cfg->parse_config_file;
}
-
- chomp($date);
$self->bdepends(
Debian::Dependencies->new( 'debhelper (>=' . $self->cfg->dh . ')' ) );
@@ -1581,7 +1577,7 @@
$fh->print("$srcname ($pkgversion) $changelog_dist; urgency=low\n");
$fh->print("\n * Initial Release.$closes\n\n");
- $fh->printf( " -- %s %s\n", $self->maintainer, $date );
+ $fh->printf( " -- %s %s\n", $self->maintainer, email_date(time) );
#$fh->print("Local variables:\nmode: debian-changelog\nEnd:\n");
$fh->close;
More information about the Pkg-perl-cvs-commits
mailing list