r526: * Don't leak regex characters from -X when generating DH_EXCLUDE_FIND.

diff --git a/Debian/Debhelper/Dh_Lib.pm b/Debian/Debhelper/Dh_Lib.pm
index b14afd1e3447332f3a53da2043c29ec7baf1ae6e..d1c67b53e65f1603d9e3575ef512ba3919c97605 100644 (file)
--- 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 $//;
        }

diff --git a/debian/changelog b/debian/changelog
index dc4bb832cc1103dc2216773bd44d6b91213f1d38..0429fd91b306f0545c8fa48d74ddb5a217ba23f8 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,9 @@
+debhelper (4.0.8) unstable; urgency=low
+
+  * Don't leak regex characters from -X when generating DH_EXCLUDE_FIND.
+
+ -- Joey Hess <joeyh@debian.org>  Wed, 22 May 2002 21:03:38 -0400
+
 debhelper (4.0.7) unstable; urgency=low
 
   * dh_strip: If a file is an ELF shared binary, does not have a .so.* in its