charset: display latin1 parents again

[sheet.git] / charset.plp

diff --git a/charset.plp b/charset.plp
index 4e25ef1edd432bf203127f7ecc9ed52fd2c4acba..bd90f899ab6556527c6331085b32dc192101993a 100644 (file)
--- a/charset.plp
+++ b/charset.plp
@@ -419,7 +419,7 @@ for my $row (@request) {
        printf '<div class="section"><table class="glyphs%s">', !$row->{cell} && ' charmap';
        my $title = $row->{set};
        $title .= " <aside>(over $_)</aside>"
        printf '<div class="section"><table class="glyphs%s">', !$row->{cell} && ' charmap';
        my $title = $row->{set};
        $title .= " <aside>(over $_)</aside>"

-               for grep { $_ ne 'iso-8859-1' } $row->{parent} // ();
+               for $row->{parent} || ();

        printf '<caption>%s</caption>', $title;
        print '<col>' x ($cols + 1);
        for my $section (qw{thead}) {
        printf '<caption>%s</caption>', $title;
        print '<col>' x ($cols + 1);
        for my $section (qw{thead}) {