r54405 - in /trunk/dh-make-perl/lib/DhMakePerl/Command: Packaging.pm refresh.pm
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Wed Mar 17 09:15:15 UTC 2010
Author: dmn
Date: Wed Mar 17 09:15:05 2010
New Revision: 54405
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=54405
Log:
backup rules only when overwriting
otherwise, the file is renamed and Rules can't read it; then a fresh one
is created; the net result was that d/rules is always re-created even if
it already uses dh7tiny style
Again, thanks to carnil.
Modified:
trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm
trunk/dh-make-perl/lib/DhMakePerl/Command/refresh.pm
Modified: trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm?rev=54405&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl/Command/Packaging.pm Wed Mar 17 09:15:05 2010
@@ -627,6 +627,8 @@
if $self->cfg->verbose;
return;
}
+
+ $self->backup_file($file);
for my $source (
catfile( $self->cfg->home_dir, $rulesname ),
Modified: trunk/dh-make-perl/lib/DhMakePerl/Command/refresh.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/lib/DhMakePerl/Command/refresh.pm?rev=54405&op=diff
==============================================================================
--- trunk/dh-make-perl/lib/DhMakePerl/Command/refresh.pm (original)
+++ trunk/dh-make-perl/lib/DhMakePerl/Command/refresh.pm Wed Mar 17 09:15:05 2010
@@ -48,7 +48,6 @@
if @{ $self->examples } and $self->cfg->verbose;
if ( 'rules' ~~ $self->cfg->only ) {
- $self->backup_file( $self->debian_file('rules') );
$self->create_rules( $self->debian_file('rules') );
if ( !-f $self->debian_file('compat') or $self->cfg->dh == 7 ) {
$self->create_compat( $self->debian_file('compat') );
More information about the Pkg-perl-cvs-commits
mailing list