From c2ac61bbb4f4caa7013e1eca41291eb5f3a28969 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 2 Apr 2017 17:26:59 +0200
Subject: [PATCH] latin: generalise - prefix to mark ex class

Replace custom container HTML for tap code by contents indicator for the
same results (emulating unicode table data).
---
 latin.plp           | 3 ++-
 writing-latn.inc.pl | 3 +--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/latin.plp b/latin.plp
index 32e0b02..9128a28 100644
--- a/latin.plp
+++ b/latin.plp
@@ -77,7 +77,8 @@ else {
 				print " colspan=$colspan";
 				$colspan = 1;
 			}
-			print '>' unless s/^<td//;
+			print ' class=ex' if s/^-//;
+			print '>';
 			say;
 		}
 	}
diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl
index 83bdfcb..42f5da6 100644
--- a/writing-latn.inc.pl
+++ b/writing-latn.inc.pl
@@ -3,8 +3,7 @@ use utf8;
 sub disptap {
 	return map {
 		!m/\A(-?)(\d)(\d)/ ? $_ :
-		sprintf('<td%s>%s<br>%s',
-			' class=ex' x !!$1,
+		$1.sprintf('%s<br>%s',
 			'·' x $2, '·' x $3,
 		);
 	} @_;
-- 
2.30.0