r481: * Whoops, I forgot to revert dh_perl too. Closes: #101477

diff --git a/debian/changelog b/debian/changelog
index a9ebf7675ac231d69c13a802968dd7462167c3db..44948daab388404501a89e91a5efeed001c09224 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+debhelper (3.0.36) unstable; urgency=low
+
+  * Whoops, I forgot to revert dh_perl too. Closes: #101477
+
+ -- Joey Hess <joeyh@debian.org>  Tue, 19 Jun 2001 14:10:24 -0400
+
 debhelper (3.0.35) unstable; urgency=low
 
   * Revert change of 3.0.30. This broke too much stuff. Maybe I'll

diff --git a/dh_perl b/dh_perl
index ea2025e0e3e7edc8ca6a765a4028e9e0fb573290..ac6fa0667f0bf3de3cdd639981e860761d1e96c9 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.debhelper")
+       if (open IN, "debian/${ext}substvars")
        {
            @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.debhelper";
+       open OUT, ">debian/${ext}substvars";
        print OUT @subs;
        close OUT;
 }