charset: enlarge glyph cells
authorMischa POSLAWSKY <perl@shiar.org>
Tue, 21 Apr 2009 02:10:33 +0000 (02:10 +0000)
committerMischa POSLAWSKY <perl@shiar.org>
Wed, 22 Apr 2009 00:01:21 +0000 (00:01 +0000)
base.css
charset.plp

index db0acf7b7425128ad6c74268b9bbb6530953f70e..759a3eab5148f745c47168acab29fbdfa941652f 100644 (file)
--- a/base.css
+++ b/base.css
@@ -164,6 +164,9 @@ table.glyphs {
 .glyphs .glyphs td {
        font-size: 100%;
 }
 .glyphs .glyphs td {
        font-size: 100%;
 }
+.glyphs.charmap tbody td {
+       font-size: 200%;
+}
 
 /* table headers */
 
 
 /* table headers */
 
index 91de26bd81c002e5cff1e7fd896c76996c25c479..faeedc2822af742923e945b668cbd313b5f10bbe 100644 (file)
@@ -108,7 +108,7 @@ print "<ul>\n";
 
 my @nibble = (0..9, 'A'..'F');
 for my $row (@request) {
 
 my @nibble = (0..9, 'A'..'F');
 for my $row (@request) {
-       print '<li><table class="glyphs">';
+       printf '<li><table class="glyphs%s">', !$row->{cell} && ' charmap';
        printf '<caption>%s</caption>', $row->{set};
        print '<col>';
        for my $section (qw{thead}) {
        printf '<caption>%s</caption>', $row->{set};
        print '<col>';
        for my $section (qw{thead}) {