style: reuse key command styles for continents

[sheet.git] / unicode.plp

diff --git a/unicode.plp b/unicode.plp
index a2e834a2fb24fbe3c543f9ba24f767b4f59c068b..349ec78d9bb89a667826c48d39d2ab2ef0a78c62 100644 (file)
--- a/unicode.plp
+++ b/unicode.plp
@@ -73,6 +73,8 @@ sub glyph_table {
                        $cell = '';
                }
                else {
+                       push @class, 'X';
+
                        if ($cell =~ s/^-//) {
                                push @class, 'di-rare'; # discouraged
                        }
@@ -86,9 +88,6 @@ sub glyph_table {
                                push @class, 'di-prop' # unofficial
                                        if $diinfo->{$code}->[2] =~ /\bXz\b/;
                        }
-                       elsif (defined $name) {
-                               push @class, 'X';
-                       }
 
                        if ($cell =~ /[ -~]/) {
                                push @class, 'di-a'; # ascii
@@ -119,11 +118,11 @@ sub glyph_table {
 
 sub print_glyph_tables {
        while (@_) {
-               printf '<section><h2>%s</h2>'."\n\n", shift;
+               printf '<div class="section"><h2>%s</h2>'."\n\n", shift;
                while (ref $_[0] and $_ = shift) {
                        print glyph_table($_);
                }
-               print '</section>';
+               print '</div>';
        }
 }