From: Mischa POSLAWSKY <perl@shiar.org>
Date: Mon, 10 Apr 2017 23:02:42 +0000 (+0200)
Subject: latin: final S forms in suetterlin sample
X-Git-Tag: v1.10~167
X-Git-Url: http://git.shiar.nl/sheet.git/commitdiff_plain/73c30a3b33f7bcddf85b7a44216b8caed7e1cd29

latin: final S forms in suetterlin sample
---

diff --git a/latinsample.js b/latinsample.js
index 37d3231..3ef69a4 100644
--- a/latinsample.js
+++ b/latinsample.js
@@ -39,8 +39,11 @@ function appendsample() {
 			else if (cols[28] && i && col == input.charCodeAt(i - 1) - 64) {
 				col = 28; // repetition char
 			}
-
-			if (col < cols.length) {
+			if (row.id == 'sütterlin' && col == 19) {
+				var final = input.length == i + 1 || input[i + 1] == ' ';
+				output += cols[col].split('&nbsp;')[final ? 1 : 0];
+			}
+			else if (col < cols.length) {
 				output += '<span>' + (cols[col] || ' ') + '</span>';
 			}
 			else {
diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl
index 4186f18..2eadbc7 100644
--- a/writing-latn.inc.pl
+++ b/writing-latn.inc.pl
@@ -16,7 +16,7 @@ my $U = 0;  # optional unicode alternatives
 (
 'Uppercase' => [qw{ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z }],
 'Lowercase' => [qw{ a b c d e f g h i j k l m n o p q r s t u v w x y z }],
-'Sütterlin' => [qw{ a b c d e f g h i j k l m n o p q r ſ s t u v w x y z }],
+'Sütterlin' => [qw{ a b c d e f g h i j k l m n o p q r ſ s t u v w x y z }],
 'Old Roman Cursive' => [
 	map { m/^(-?)(\w.*)/ ? $1.'<svg width="20" height="20" viewBox="0 0 12 20"><path d="'.$2.'"/></svg>' : $_ }
 	"m2,4 c1,2 8,9 8,9 M2,15 6,9",