r475: * dh_gencontrol: Added a documented interface for specifying substvars

[debhelper.git] / dh_perl

diff --git a/dh_perl b/dh_perl
index ac6fa0667f0bf3de3cdd639981e860761d1e96c9..ea2025e0e3e7edc8ca6a765a4028e9e0fb573290 100755 (executable)
--- a/dh_perl
+++ b/dh_perl
@@ -89,7 +89,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
        my $ext = pkgext($package);
 
        my @subs;
-       if (open IN, "debian/${ext}substvars")
+       if (open IN, "debian/${ext}substvars.debhelper")
        {
            @subs = grep !/^perl:Depends=/, <IN>;
            close IN;
@@ -144,7 +144,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
                unless $perl_depends eq 'perl-base';
        }
 
-       open OUT, ">debian/${ext}substvars";
+       open OUT, ">debian/${ext}substvars.debhelper";
        print OUT @subs;
        close OUT;
 }