From e35c56fed3c51b3c7d4b41da2fa459872868cf67 Mon Sep 17 00:00:00 2001 From: Olivier Thauvin Date: Sat, 1 Jul 2006 18:53:10 +0000 Subject: - fix potential bug with buildroot than include regexp meta character --- relink_symlinks | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'relink_symlinks') diff --git a/relink_symlinks b/relink_symlinks index 5ad5234..251fb20 100644 --- a/relink_symlinks +++ b/relink_symlinks @@ -12,7 +12,7 @@ sub relativize { $link =~ s{^/}{}; my $dirname = $File::Find::dir; - $dirname =~ s/^$ENV{RPM_BUILD_ROOT}//; + $dirname =~ s/^\Q$ENV{RPM_BUILD_ROOT}\E//; $dirname =~ s{/[^/]+}{../}g; unlink $_; -- cgit v1.2.1