From 6f79d5cba3c0d84591a8147576a494a7eccffe51 Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Tue, 19 Jun 2001 18:13:11 +0000
Subject: [PATCH] r481:    * Whoops, I forgot to revert dh_perl too. Closes:
 #101477

---
 debian/changelog | 6 ++++++
 dh_perl          | 4 ++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index a9ebf76..44948da 100644
--- 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 ea2025e..ac6fa06 100755
--- 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;
 }
-- 
2.39.2