From 8e0691a21799ddf303419876e0681df88cfcf56e Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Sat, 9 Feb 2002 22:39:19 +0000
Subject: r509:    * dh_perl: don't gripe if there is no substvar file. Closes:
 #133140

---
 Debian/Debhelper/Dh_Lib.pm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'Debian')

diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index ea4046a3..a909335b 100644
--- 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
-- 
cgit v1.2.3