git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
latin: match suetterlin row by identifier
[sheet.git]
/
latin.plp
diff --git
a/latin.plp
b/latin.plp
index 1fda12c5fb40846fa8cc49b62f11fb0c1cf93dd9..8c2bef5a32019d82b639f0c48ff57c1b80407666 100644
(file)
--- a/
latin.plp
+++ b/
latin.plp
@@
-21,7
+21,7
@@
Html({
font-family: Suetterlin; /* R. G. Arens */
src: url("/suetterlin.ttf");
}
font-family: Suetterlin; /* R. G. Arens */
src: url("/suetterlin.ttf");
}
-
.glyphs tr:first-child+tr+tr
td { font-family: Suetterlin }
+
#sütterlin
td { font-family: Suetterlin }
svg path:not([fill]) {
stroke: currentColor;
svg path:not([fill]) {
stroke: currentColor;
@@
-56,7
+56,8
@@
else {
say '<table class="glyphs">';
for my $row (pairs @table) {
my ($title, $cells) = @{$row};
say '<table class="glyphs">';
for my $row (pairs @table) {
my ($title, $cells) = @{$row};
- say '<tr><th>', $title;
+ printf '<tr id="%s">', (lc $title) =~ s/<[^>]+>//gr =~ s/\s+/-/gr;
+ say '<th>', $title;
print /^<td/ ? $_ : "\t<td>$_\n" for @{$cells};
}
say "</table>\n";
print /^<td/ ? $_ : "\t<td>$_\n" for @{$cells};
}
say "</table>\n";