This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove a TODO test that is no longer to do.
[perl5.git] / ext / B / t / f_sort.t
index f03b8cd..7589da9 100644 (file)
@@ -342,7 +342,6 @@ print sort @george, 'to', @harry;
 
 checkOptree(name   => q{sort USERSUB LIST },
            bcopts => q{-exec},
-           todo   => 'sort why BARE flag happens',     
            code   => q{sub backwards { $b cmp $a }
                        @harry = qw(dog cat x Cain Abel);
                        @george = qw(gone chased yz Punished Axed);