[PATCH] Fix t/30-current_exec.t failing when cwd contains regexp metacharacters
Niko Tyni
ntyni at debian.org
Fri Apr 9 19:28:50 UTC 2010
As TEMPDIR contains the build directory name, it may have regexp
metacharacter like '+' in that need escaping.
---
t/30-current_exec.t | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/t/30-current_exec.t b/t/30-current_exec.t
index 4801543..d5baffe 100644
--- a/t/30-current_exec.t
+++ b/t/30-current_exec.t
@@ -43,7 +43,7 @@ ok( (-f $EXEC), "Created \"$EXEC\"" )
$ENV{PAR_GLOBAL_TMPDIR} = $TEMP;
my $out_full = qx($EXEC);
-ok( ($out_full =~ /PAR_TEMP = $TEMP/), "Respected PAR_GLOBAL_TMPDIR" );
+ok( ($out_full =~ /PAR_TEMP = \Q$TEMP\E/), "Respected PAR_GLOBAL_TMPDIR" );
my( $file, $path ) = fileparse( $EXEC );
--
1.7.0.4
--0F1p//8PRICkK4MW--
More information about the pkg-perl-maintainers
mailing list