X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/7ce9b5fb929d8db597cb08c830ef116cfd1fd078..91451e42347a75e822ac69341556a66aff081878:/ext/B/t/f_sort.t

diff --git a/ext/B/t/f_sort.t b/ext/B/t/f_sort.t
index f03b8cd..7589da9 100644
--- a/ext/B/t/f_sort.t
+++ b/ext/B/t/f_sort.t
@@ -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);