From e5fd7eb1e142ccf2b2dcea5993168102219c5b9d Mon Sep 17 00:00:00 2001
From: joey <joey>
Date: Thu, 23 May 2002 01:37:24 +0000
Subject: r526:    * Don't leak regex characters from -X when generating
 DH_EXCLUDE_FIND.

---
 Debian/Debhelper/Dh_Lib.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'Debian/Debhelper')

diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index b14afd1e..d1c67b53 100644
--- a/Debian/Debhelper/Dh_Lib.pm
+++ b/Debian/Debhelper/Dh_Lib.pm
@@ -52,7 +52,10 @@ sub init {
 	if ($dh{EXCLUDE}) {
 		$dh{EXCLUDE_FIND}='';
 		foreach (@{$dh{EXCLUDE}}) {
-			$dh{EXCLUDE_FIND}.="-regex ".escape_shell(".*$_.*")." -or ";
+			my $x=$_;
+			$x=escape_shell($x);
+			$x=~s/\./\\\\./g;
+			$dh{EXCLUDE_FIND}.="-regex .\\*$x.\\* -or ";
 		}
 		$dh{EXCLUDE_FIND}=~s/ -or $//;
 	}
-- 
cgit v1.2.3