From: Mischa POSLAWSKY <perl@shiar.org>
Date: Fri, 12 Nov 2010 00:09:04 +0000 (+0100)
Subject: style/mono: support browser and unicode pages
X-Git-Tag: v1.4~95
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/9dfef01d97d7c0f4f7137671e2c370e3cfc686a3

style/mono: support browser and unicode pages
---

diff --git a/browser.plp b/browser.plp
index 29002d0..8c0bd6a 100644
--- a/browser.plp
+++ b/browser.plp
@@ -32,6 +32,7 @@ my %CSTATS = (
 	'p j' => 'l2',
 	'j'   => 'l2',
 	'p'   => 'l2',
+	'u'   => 'ex',
 );
 my %CSTATUS = (
 	unoff => 'ex', # unofficial
@@ -145,7 +146,7 @@ for my $id (sort {
 				my $usage = sum(map { $canihas->{$browser}->{$_} } @span);
 				printf '<td class="%s" colspan="%d" title="%.1f%%">%s',
 					join(' ',
-						$CSTATS{ $data->{$browser}->{$prev} },
+						X => $CSTATS{ $data->{$browser}->{$prev} },
 						sprintf('opacity%.0f', $usage / $scorediv),
 					),
 					scalar @span,
diff --git a/mono.css b/mono.css
index 885ddc9..a8a710c 100644
--- a/mono.css
+++ b/mono.css
@@ -3,6 +3,20 @@
 
 body dl.legend-options dt {background: #EEE}
 
+td,
+.X  {background: #EEE}
+.ex a, .ex a:visited,
+.ex {background: #BBB; color: #FFF; text-shadow: 0 0 4px #000}
+.l0 a, .l0 a:visited,
+.l0 {background: #000; color: #FFF}
+.l2 a, .l2 a:visited,
+.l2 {background: #444; color: #FFF}
+.l4 {background: #AAA; color: #000}
+.l5 {background: #DDD; color: #000}
+.l6 {background: #EEE; color: #000}
+.l6.ex, .l5.ex, .l4.ex, .l2.ex,
+.l0.ex                {color: #888; text-shadow: none}
+
 .pm, .g1 {background: #FFF}   /* motion */
 .po, .g2 {background: #DDD}   /* window */
 .co, .g3 {background: #AAA}   /* command */
diff --git a/unicode.plp b/unicode.plp
index 70f13e6..3a6a0c9 100644
--- a/unicode.plp
+++ b/unicode.plp
@@ -10,7 +10,7 @@ Html({
 	keywords => [qw'
 		unicode glyph char character reference common ipa symbol sign mark table digraph
 	'],
-	stylesheet => [qw'light dark red'],
+	stylesheet => [qw'light dark mono red'],
 	data => [qw'digraphs.inc.pl'],
 });
 
@@ -215,7 +215,7 @@ $verbose ? (
 	<td class="X l4"><:= $glyphs->{digraph} ? 'digraph' : 'latin1' :>
 	<td class="X l2"><:= $glyphs->{digraph} ? 'proposed' : 'BMP' :>
 	<td class="X l0">other unicode
-	<td class="X ex">discouraged
+	<td class="X l2 ex">discouraged
 	</table>
 </div>