perl: versionless "dropped" attribute to hide

[sheet.git] / perl.plp

diff --git a/perl.plp b/perl.plp
index 49694fc67abbb87d34d4b223f1f27111976c00f2..1f5cfe79fa41360d75907ded5cb2003423d7807b 100644 (file)
--- a/perl.plp
+++ b/perl.plp
@@ -110,9 +110,9 @@ sub featattrs ($attr) {
        if (defined $attr->{experimental}) {
                $title = 'experimental';
        }
-       if ($attr->{dropped}) {
+       if (defined $attr->{dropped}) {
                next unless exists $get{v};
-               $title = sprintf 'removed in %vd', $attr->{dropped};
+               $title = sprintf 'removed in %vd', $_ for $attr->{dropped} || ();
        }
        elsif ($attr->{stable}) {
                $title .= sprintf ' until %vd', $attr->{stable};