Lines Matching refs:what
265 foreach my $what (@disablables) {
266 $longest = length($what) if $longest < length($what);
267 $longest2 = length($disabled{$what})
268 if $disabled{$what} && $longest2 < length($disabled{$what});
271 foreach my $what (@disablables) {
272 print " $what\n" unless $disabled{$what};
275 foreach my $what (@disablables) {
276 if ($disabled{$what}) {
277 print " $what", ' ' x ($longest - length($what) + 1),
278 "[$disabled{$what}]", ' ' x ($longest2 - length($disabled{$what}) + 1);
279 print $disabled_info{$what}->{macro}
280 if $disabled_info{$what}->{macro};
282 join(', ', @{$disabled_info{$what}->{skipped}}),
284 if $disabled_info{$what}->{skipped};
