From 8e3fc45ef77b9b443b7a05fdb9fc5ea56082f5e4 Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Sat, 6 Jul 2002 02:27:32 +0000
Subject: [PATCH] r536:    * Patch from doogie to make dh_movefiles support -X.
 Closes: #150978    * Pound home in dh_installman's man page that yet, it
 really does do the      right thing. Closes: #150644

---
 debian/changelog |  4 ++--
 dh_movefiles     | 14 ++++++++++++--
 2 files changed, 14 insertions(+), 4 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 8a29fb3..b2e10d1 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,10 +1,10 @@
 debhelper (4.0.16) unstable; urgency=low
 
-UNRE
+  * Patch from doogie to make dh_movefiles support -X. Closes: #150978
   * Pound home in dh_installman's man page that yet, it really does do the
     right thing. Closes: #150644
 
- -- Joey Hess <joeyh@debian.org>  Fri, 21 Jun 2002 16:21:06 -0400
+ -- Joey Hess <joeyh@debian.org>  Thu,  4 Jul 2002 22:28:53 -0400
 
 debhelper (4.0.15) unstable; urgency=low
 
diff --git a/dh_movefiles b/dh_movefiles
index 97427b8..ec13a01 100755
--- a/dh_movefiles
+++ b/dh_movefiles
@@ -11,7 +11,7 @@ use Debian::Debhelper::Dh_Lib;
 
 =head1 SYNOPSIS
 
-B<dh_movefiles> [S<I<debhelper options>>] [B<--sourcedir=>I<dir>] [S<I<file ...>>]
+B<dh_movefiles> [S<I<debhelper options>>] [B<--sourcedir=>I<dir>] [B<-X>I<item>] S<I<file ...>>]
 
 =head1 DESCRIPTION
 
@@ -41,6 +41,11 @@ the sourcedir is moved, specifiying something like --sourcedir=/ is very
 unsafe, so to prevent mistakes, the sourcedir must be a relative filename;
 it cannot begin with a `/'.
 
+=item B<-Xitem>, B<--exclude=item>
+
+Exclude files that contain "item" anywhere in their filename from
+being installed.
+
 =item I<file ...>
 
 Lists files to move. The filenames listed should be relative to
@@ -126,7 +131,12 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 				warning("$file not found (supposed to put it in $package)");
 			}
 			$file=~s:^\Q$sourcedir\E/+::;
-			complex_doit("(cd $sourcedir >/dev/null ; find $file ! -type d -print || true) >> debian/movelist");
+			my $cmd="(cd $sourcedir >/dev/null ; find $file ! -type d ";
+			if ($dh{EXCLUDE_FIND}) {
+				$cmd.="-a ! \\( $dh{EXCLUDE_FIND} \\) ";
+			}
+			$cmd.="-print || true) >> debian/movelist";
+			complex_doit($cmd);
 		}
 		my $pwd=`pwd`;
 		chomp $pwd;
-- 
2.39.2