From f375c254bef045414797dfb9bd55c6ddc7391659 Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Thu, 6 Jul 2000 00:18:18 +0000
Subject: r353:    * Modified all postinst script fragments to only run when
 called with      "configure". I looked at the other possibilities, and I
 don't think any      of the supported stuff should be called if the postist
 is called for      error unwinds. Closes: #66673    * Implemented dh_clean
 -X, to allow specification of files to not delete,      Closes: #66670

---
 dh_clean | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

(limited to 'dh_clean')

diff --git a/dh_clean b/dh_clean
index 1ca10125..4b98a6a0 100755
--- a/dh_clean
+++ b/dh_clean
@@ -30,6 +30,14 @@ if (! $dh{D_FLAG}) {
 		doit("rm","-f","debian/files");
 	}
 
+	# See if some files that would normally be deleted are excluded.
+	if (! defined($dh{EXCLUDE_FIND}) || $dh{EXCLUDE_FIND} eq '') {
+		$find_options="";
+	}
+	else {
+		$find_options="-a ! ( $dh{EXCLUDE_FIND} )";
+	}
+
 	# Remove other temp files.
 	# (The \s+ is important, \s won't work because find would get null
 	# parameters). Note that you _don't_ quote wildcards used by find
@@ -39,7 +47,7 @@ if (! $dh{D_FLAG}) {
 		 -o -name *.orig -o -name *.rej -o -name *.bak
 		 -o -name .*.orig -o -name .*.rej -o -name .SUMS
 		 -o -name TAGS -o -name core -o ( -path */.deps/* -a -name *.P )
-		) -exec rm -f {} ;"));
+		) $find_options -exec rm -f {} ;"));
 }
 
 doit('rm', '-rf', 'debian/tmp')
-- 
cgit v1.2.3