Lines Matching refs:feature_bundle
75 my %feature_bundle = (
123 for (keys %feature_bundle) {
125 $feature_bundle{"5.".($1+1)} ||= $feature_bundle{$_};
130 for( sort keys %feature_bundle ) {
131 my $value = join(' ', sort @{$feature_bundle{$_}});
146 for (@{$feature_bundle{$bund}}) {
226 print $pm "our %feature_bundle = (\n";
273 for ('default', sort grep /\.\d[02468]/, keys %feature_bundle) {
275 $::feature = join ' ', @{$feature_bundle{$_}};
1157 && $feature_bundle{$hint_bundles[$bundle_number >> $hint_shift]};
1172 if (!exists $feature_bundle{$v}) {
1174 if (!exists $feature_bundle{$v}) {
1178 unshift @_, @{$feature_bundle{$v}};
1227 return $feature_bundle{$hint_bundles[$bundle_number >> $hint_shift]}->@*;
1253 for my $bundle_feature ($feature_bundle{$bundle}->@*) {