diff options
author | Jesse Luehrs <doy@tozt.net> | 2016-08-30 01:39:41 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2016-08-30 01:40:02 -0400 |
commit | 670260979d63d18c82f94c8ae2c88290810e40a3 (patch) | |
tree | e9f1ed2d0a4cdc509703eef266b348658e737b2f /t | |
parent | 07edf5e4760c25baedc1e911221802918744d8f1 (diff) | |
download | carp-always-color-670260979d63d18c82f94c8ae2c88290810e40a3.tar.gz carp-always-color-670260979d63d18c82f94c8ae2c88290810e40a3.zip |
more regex escaping (Slaven_Rezic, #117314)
this will be required in 5.26
Diffstat (limited to 't')
-rw-r--r-- | t/eval.t | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -12,7 +12,7 @@ output_like(<<EOF, die \$@; } EOF - qr/\e\[31m\e\[31mfoo\e\[m\e\[m at -e line 2\.?\n\teval {\.\.\.} called at -e line 4\b/, + qr/\e\[31m\e\[31mfoo\e\[m\e\[m at -e line 2\.?\n\teval \{\.\.\.\} called at -e line 4\b/, "rethrowing works"); output_like(<<EOF, @@ -25,7 +25,7 @@ output_like(<<EOF, } foo(); EOF - qr/\e\[31m\e\[31mfoo\e\[m\e\[m at -e line 3\.?\n\teval {\.\.\.} called at -e line 3\n\tmain::foo\(\) called at -e line 5\.?\n\tmain::foo\(\) called at -e line 8\n/, + qr/\e\[31m\e\[31mfoo\e\[m\e\[m at -e line 3\.?\n\teval \{\.\.\.\} called at -e line 3\n\tmain::foo\(\) called at -e line 5\.?\n\tmain::foo\(\) called at -e line 8\n/, "rethrowing works inside functions"); done_testing; |