r509: * dh_perl: don't gripe if there is no substvar file. Closes: #133140

diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index ea4046a3ba12334f7467bfd156fcaf9c72540ec1..a909335bec72ee5c6e4d2a78860896bc36ec69f8 100644 (file)
--- a/Debian/Debhelper/Dh_Lib.pm
+++ b/Debian/Debhelper/Dh_Lib.pm
@@ -367,8 +367,10 @@ sub delsubstvar {
        my $ext=pkgext($package);
        my $substvarfile="debian/${ext}substvars";
 
-       complex_doit("grep -v '^${substvar}=' $substvarfile > $substvarfile.new || true");
-       doit("mv", "$substvarfile.new","$substvarfile");
+       if (-e $substvarfile) {
+               complex_doit("grep -v '^${substvar}=' $substvarfile > $substvarfile.new || true");
+               doit("mv", "$substvarfile.new","$substvarfile");
+       }
 }
                                
 # Adds a dependency on some package to the specified

diff --git a/debian/changelog b/debian/changelog
index 449903716f8b0eaa80d4f546eef586340531dad4..0011fd9199b6199c352fd1cbc88d2444df01d5a5 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+debhelper (3.4.7) unstable; urgency=low
+
+  * dh_perl: don't gripe if there is no substvar file. Closes: #133140
+
+ -- Joey Hess <joeyh@debian.org>  Sat,  9 Feb 2002 17:37:32 -0500
+
 debhelper (3.4.6) unstable; urgency=low
 
   * Typo, Closes: #132454