diff options
author | Tony Cook <tony@develop-help.com> | 2013-07-15 16:16:22 +1000 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2013-08-12 15:13:01 +1000 |
commit | ae5c28e814c627cae6eff15424529d46decc4366 (patch) | |
tree | 28f5fd13aef9781b8e681f736762fccdb67b589a /lib/bytes.t | |
parent | 93e088e883c48d3aa622b15ae335940abb05a48f (diff) | |
download | perl-ae5c28e814c627cae6eff15424529d46decc4366.tar.gz |
[perl #117355] unTODO the [lu]cfirst under bytes tests
Diffstat (limited to 'lib/bytes.t')
-rw-r--r-- | lib/bytes.t | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lib/bytes.t b/lib/bytes.t index 6ac18df416..8fc535fefb 100644 --- a/lib/bytes.t +++ b/lib/bytes.t @@ -62,7 +62,6 @@ utf8::encode(my $c2_utf8 = $c2); # and if there's other tests for lc/uc under bytes I didn't find them is(lc($c2), $c2_utf8, "lc under use bytes returns bytes"); is(uc($c2), $c2_utf8, "uc under use bytes returns bytes"); - local $TODO = "[perl #117355] [lu]cfirst don't respect 'use bytes'"; is(lcfirst($c2), $c2_utf8, "lcfirst under use bytes returns bytes"); is(ucfirst($c2), $c2_utf8, "unfirst under use bytes returns bytes"); } |