X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/c74ecf690c0c9047a11049d629a791de47857b53..6e5b350ed0447acfe7b0b4cf02a8b11de08d376f:/unicode.plp?ds=inline
diff --git a/unicode.plp b/unicode.plp
index 8dfe132..dd7de6d 100644
--- a/unicode.plp
+++ b/unicode.plp
@@ -17,6 +17,7 @@ $header{content_type} = 'text/html; charset=utf-8';
digraph cheat sheet
+
@@ -59,7 +60,6 @@ sub glyph_table {
my $colspan = 1;
for my $cell (@$digraphs) {
- my $class;
if ($cell =~ s/^\.//) {
# dot indicates start of a new row
push @rows, '';
@@ -80,30 +80,37 @@ sub glyph_table {
my $name = $diinfo->{$code}->[1];
# determine display class
- if ($cell =~ s/^-//) {
-# $class = 'Empty';
+ my @class;
+ if ($cell eq '-') {
+ $cell = '';
}
elsif ($cell eq '=') {
- $class = 'Reserved';
+ push @class, 'di-invalid';
$cell = '';
}
- elsif ($cell =~ /[ -~]/) {
- $class = 'Ascii';
- }
- elsif (not $code) {
- $class = 'DiNone';
- }
- elsif ($diinfo->{$code}->[2] =~ /\bXz\b/) {
- $class = 'DiProp';
- }
else {
- $class = 'Di';
+ if ($cell =~ s/^-//) {
+ push @class, 'di-rare'; # discouraged
+ }
+
+ if ($code) {
+ push @class, 'di-d'; # digraph
+ push @class, 'di-prop' # unofficial
+ if $diinfo->{$code}->[2] =~ /\bXz\b/;
+ }
+
+ if ($cell =~ /[ -~]/) {
+ push @class, 'di-a'; # ascii
+ }
+ else {
+ push @class, 'di-b'; # basic unicode
+ }
}
# add cell html
$rows[-1] .= sprintf('%s%s',
defined $name ? qq{ title="$name"} : '',
- defined $class ? qq{ class="$class"} : '',
+ @class ? sprintf(' class="%s"', join ' ', @class) : '',
$colspan > 1 && qq{ colspan="$colspan"},
$cell eq '' ? ' ' : quote($cell),
$code ne '' ? sprintf(' %s', quote($code))
@@ -131,16 +138,16 @@ sub print_glyph_tables {
print_glyph_tables(
'Popular',
- [qw{. « » . ⹠⺠. â â . â â . â â}],
- [qw{. â ⡠⢠. § ¶ # . © ® ⢠. â à ÷ . ± ² â}],
+ [qw{. « » . ⹠⺠. â â . â â . â â . â â}],
+ [qw{. â ⡠⢠. § ¶ # . © ® ⢠. ° â² â³ . â à ÷ . ± ² â}],
[qw{. Ã¥ ä ö ü à . Ã
æ ø ű ſ}],
[qw{. ¿ ç ñ é ê è}],
'Arrows',
[qw{. â â â â . â - â â . â â â -}],
[qw{. â â â â . â - â â . â â â -}],
- [qw{. ⤠Ⲡ⥠. â â ⶠ. ⣠⼠â¢}],
- [qw{. ⸠Ⳡ⹠. â â â· . ⺠⽠â¿}],
+ [qw{. ⤠Ⲡ⥠. â â ⶠ. ⣠⼠⢠}],
+ [qw{. ⸠Ⳡ⹠. â â â· . ⺠⽠⿠}],
'Line drawing',
[qw{. â ⬠â . â ⼠⤠. â â´ â}],
@@ -176,8 +183,8 @@ print_glyph_tables(
- BiL:Bilabial LD:Labiodental D:Dental Alv:Alveolar PA:Postalveolar
Rf:Retroflex Pal:Palatal Vel:Velar Uv:Uvular Ph:Pharyngeal
EG:Epiglottal Gl:Glottal
- .>Plosive p p̪ > > t Ê c k q = Ê¡ Ê
- .>Voiced_Plosive b b̪ > > d É É É¡ É¢ = - =
+ .>Plosive p -ȹ > > t Ê c k q = Ê¡ Ê
+ .>Voiced_Plosive b -ȸ > > d É É É¡ É¢ = - =
.>Nasal m ɱ > > n ɳ ɲ Šɴ = = =
.>Trill Ê - > > r - - = Ê = -Ñ =
.>Tap/flap - â±± > > ɾ ɽ - = É¢Ì = - =
@@ -190,13 +197,16 @@ print_glyph_tables(
.>Click Ê - Ç Ç Ç -â¼ Ç - - = = =
.>Implosive É É̪ > > É -á¶ Ê É Ê = = =
}],
+ [qw{
+ co . É . Ê . ɧ . É¥ . Ê . w
+ }],
[(
'-',
map { substr($_, 0, 1).':'.$_, substr($_, 0, 1)." r:$_ rounded" }
qw{Front Central Back}
), qw{
.>Close i y ɨ Ê É¯ u
- .>Near-close - ɪ Ê - Ê -
+ .>Near-close ɪ Ê - - - Ê
.>Close-mid e ø É Éµ ɤ o
.>Mid - - É - - -
.>Open-mid É Å É É Ê É
@@ -224,7 +234,7 @@ print_glyph_tables(
.>M ã¾ ã¿ ã ã ã =
.>Y ã = ã = ã =
.>R ã ã ã ã ã =
- .>W ã ã = ã ã =
+ .>W ã -ã = -ã ã =
}],
[qw{
- A I U E O
@@ -260,9 +270,19 @@ print_glyph_tables(
:>
+
+
+ ascii
+ | digraph
+ | proposed
+ | other unicode
+ | discouraged
+ |
+
+
|