X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=t%2Fsnippets16.t;h=9e8f75c05b7afb3564a602ac2db0a2a271339f12;hb=effbe8e558790d5f5e4eb49a10b2ed020b0eaaee;hp=7322a8b5cbb886c6efca7b7ca4662b208205eda9;hpb=c514d57dc8088e1f4d3f51857b1155c20085c296;p=perltidy.git diff --git a/t/snippets16.t b/t/snippets16.t index 7322a8b..9e8f75c 100644 --- a/t/snippets16.t +++ b/t/snippets16.t @@ -236,11 +236,11 @@ my %Structure = $Self->PackageParse( String => $Package ); # perltidy -wn -ce -cbl=sort,map,grep @sorted = map { $_->[0] -} sort { + } sort { $a->[1] <=> $b->[1] or $a->[0] cmp $b->[0] -} map { + } map { [ $_, length($_) ] -} @unsorted; + } @unsorted; #5........... },