From 0b850332e9ee4ff638e8468ed8267e93ce325408 Mon Sep 17 00:00:00 2001 From: Bill Wendling Date: Thu, 2 Aug 2001 12:27:56 -0500 Subject: [svn-r4305] Purpose: Back-port of Bug Fix Description: Back port of hte bug fix for matching anything when we really only wanted to match a ".". Solution: Escaped the "." with "\." in the matching string. Platforms tested: Linux --- bin/dependencies | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/bin/dependencies b/bin/dependencies index 248c579..50f362a 100755 --- a/bin/dependencies +++ b/bin/dependencies @@ -13,13 +13,13 @@ my $top_builddir; while ($_ = shift @ARGV) { if (/^--srcdir=([^ \t\n]*)/) { $srcdir = $1; - $srcdir = "\\$srcdir" if $srcdir =~ /^\./; + $srcdir =~ s/\./\\\./g; } elsif (/^--top_srcdir=([^ \t\n]*)/) { $top_srcdir = $1; - $top_srcdir = "\\$top_srcdir" if $top_srcdir =~ /^\./; + $top_srcdir =~ s/\./\\\./g; } elsif (/^--top_builddir=([^ \t\n]*)/) { $top_builddir = $1; - $top_builddir = "\\$top_builddir" if $top_builddir =~ /^\./; + $top_builddir =~ s/\./\\\./g; } else { $depend_file = $_; $new_depend_file = "$_.new"; -- cgit v0.12