From 0b57d5121c74fe18615499055e2f079c81c89001 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Thu, 13 Apr 2017 01:45:00 +0200
Subject: [PATCH] latin: improve word wrapping for tap, chromacons

---
 latin.plp           | 1 +
 writing-latn.inc.pl | 7 ++++---
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/latin.plp b/latin.plp
index 25d8b10..46e985f 100644
--- a/latin.plp
+++ b/latin.plp
@@ -40,6 +40,7 @@ Html({
 		vertical-align: middle;
 		text-align: left;
 		padding: 1px 0.3em;
+		white-space: normal;
 	}
 </style>
 
diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl
index 35ab1ab..aa0e444 100644
--- a/writing-latn.inc.pl
+++ b/writing-latn.inc.pl
@@ -12,9 +12,9 @@ my %C = (
 my $U = 0;  # optional unicode alternatives
 
 my @wrapstyle = (
-	'td { white-space: normal; word-spacing: 5em }', # force line break between words
+	'td { white-space: normal; word-spacing: 10em }', # force line break between words
 	'.sample { word-spacing: 0 }',
-	'.sample span { margin-right: 1ex; white-space: nowrap }', # larger space between letters
+	'.sample span { margin-right: 1ex; white-space: nowrap; display: inline-block }', # larger space between letters
 );
 my $spacestyle = '.sample span { margin-right: 0.5ex }';  # separate multiple letters
 my @tapstyle = (
@@ -596,12 +596,13 @@ nyctographs => {
 	],
 },
 chromacons => {
+#	style => '.sample { word-break: break-all }',
 	list => [
 		# Colour Alphabet by Paul Green-Armytage (2010)
 		map {
 			sprintf('<span%s>%s</span>',
 				!!$_ && sprintf(' style="background:#%s" title="%s"', split /:/),
-				chr(8195), # em space
+				chr(8195) . (!$_ && chr(8203)) # em space (plus zwsp for spaces)
 			);
 		}
 		qw{
-- 
2.30.0