From: Vincent Pit Date: Sun, 27 Feb 2011 18:46:59 +0000 (+0100) Subject: Be a little more lax in 16-recurse.t regexp test X-Git-Tag: v0.05~5 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=a28ee6cf947ee0cb989b129ecaf9fe4909d73886;p=perl%2Fmodules%2FB-RecDeparse.git Be a little more lax in 16-recurse.t regexp test This makes early 5.8 versions happier. --- diff --git a/t/16-recurse.t b/t/16-recurse.t index e0f7c03..32abbdf 100644 --- a/t/16-recurse.t +++ b/t/16-recurse.t @@ -76,7 +76,6 @@ for (@tests) { s/^\s*//mg, s/\s*$//mg for $body; - like $body, qr/^\{ [^{}]* $exp [^{}]* \}$/x, - "deparsing $desc at level $level correctly"; + like $body, qr/$exp/, "deparsing $desc at level $level correctly"; } }