diff options
| author | Karl Williamson <khw@cpan.org> | 2021-01-14 07:52:26 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2021-01-20 06:51:50 -0700 |
| commit | 1b2f32d508340483aa270e0caf653ba0454345d1 (patch) | |
| tree | 154177a878f233a5023ff8bbb06271fed6526c38 /t/re/pat_advanced.t | |
| parent | a44b2be795f4c5f94384c6f6010860588e144b3c (diff) | |
| download | perl-1b2f32d508340483aa270e0caf653ba0454345d1.tar.gz | |
Allow blanks within and adjacent to {...} constructs
This was the consensus in
http://nntp.perl.org/group/perl.perl5.porters/258489
Diffstat (limited to 't/re/pat_advanced.t')
| -rw-r--r-- | t/re/pat_advanced.t | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/t/re/pat_advanced.t b/t/re/pat_advanced.t index 8c6909569b..d67987099a 100644 --- a/t/re/pat_advanced.t +++ b/t/re/pat_advanced.t @@ -996,14 +996,6 @@ sub run_tests { } undef $w; - { - () = eval q ["\N{TRAILING SPACE }"]; - like ($@, qr/charnames alias definitions may not contain trailing white-space/, "Trailing white-space in a charnames alias is fatal"); - eval q [use utf8; () = "\N{TRAILING SPACE }"]; - like ($@, qr/charnames alias definitions may not contain trailing white-space/, "... same under utf8"); - } - - undef $w; my $Cedilla_Latin1 = "GAR" . uni_to_native("\xC7") . "ON"; |