develooper Front page | perl.perl5.changes | Postings from March 2019

[perl.git] branch blead updated. v5.29.8-79-gb99b8a8409

From:
Karl Williamson
Date:
March 12, 2019 21:27
Subject:
[perl.git] branch blead updated. v5.29.8-79-gb99b8a8409
Message ID:
E1h3ovK-0005YI-Nx@git.dc.perl.space
In perl.git, the branch blead has been updated

<https://perl5.git.perl.org/perl.git/commitdiff/b99b8a84094a9456f8f9a16cba3ec83f06df6304?hp=3282ee13c09f8fd1009f35571059ec6e8204b2ec>

- Log -----------------------------------------------------------------
commit b99b8a84094a9456f8f9a16cba3ec83f06df6304
Author: Karl Williamson <khw@cpan.org>
Date:   Tue Mar 12 15:20:29 2019 -0600

    t/re/pat_advanced.t: Add some comments

-----------------------------------------------------------------------

Summary of changes:
 t/re/pat_advanced.t | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/t/re/pat_advanced.t b/t/re/pat_advanced.t
index ade8b1587a..2eec50221a 100644
--- a/t/re/pat_advanced.t
+++ b/t/re/pat_advanced.t
@@ -907,7 +907,8 @@ sub run_tests {
 	BEGIN {
 	    unshift @INC, 'lib';
 	}
-        use Cname;
+        use Cname;  # Our custom charname plugin, currently found in
+                    # t/lib/Cname.pm
 
         like 'fooB', qr/\N{foo}[\N{B}\N{b}]/, "Passthrough charname";
         my $name = "foo\xDF";
@@ -937,6 +938,8 @@ sub run_tests {
         like $w, qr/Ignoring zero length/,
                  'Ignoring zero length \N{} in character class warning';
 
+        # EVIL keeps track of its calls, and appends a new character each
+        # time: A AB ABC ABCD ...
         ok 'AB'  =~ /(\N{EVIL})/ && $1 eq 'A', 'Charname caching $1';
         like 'ABC', qr/(\N{EVIL})/,              'Charname caching $1';
         like 'xy',  qr/x\N{EMPTY-STR}y/,

-- 
Perl5 Master Repository



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About