- if ($attr) {
- my $title;
- if (defined $attr->{experimental}) {
- $title = 'experimental';
- }
- if ($attr->{dropped}) {
- next unless exists $get{v};
- $title = sprintf 'removed in %vd', $attr->{dropped};
- }
- elsif ($attr->{stable}) {
- $title .= sprintf ' until %vd', $attr->{stable};
- }
- if ($attr->{experimental}) {
- $title = sprintf '<span title="experimental::%s">%s</span>',
- $attr->{experimental}, $title;
- $attr->{name} //= $attr->{experimental};
- }
- if ($attr->{feature}) {
- my $prefix = sprintf '<span title="%s">feature</span>',
- $attr->{feature};
- $title = join ', ', $prefix, $title // ();
- $attr->{name} //= $attr->{feature};
- }
- $desc .= sprintf ' <em class="ex">(%s)</em>', $title if $title;
- }