X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/946aeebebf11ee744f1a8518a603bc3f29dd2cc1..8d8b8ca5cbc2d00585009fb4ef4288ba03b538a5:/writing-latn.inc.pl diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl index 018a632..2498d2a 100644 --- a/writing-latn.inc.pl +++ b/writing-latn.inc.pl @@ -3,7 +3,7 @@ use utf8; sub disptap { return map { m/\A(-?)(\d)(\d)/; - sprintf('%s
%s', + sprintf('%s
%s', ' class=ex' x !!$1, '·' x $2, '·' x $3, ); @@ -281,7 +281,7 @@ my %C = qw(red #EC1C24 blue #3953A3 yellow #F9EC31 black #231F20); s/(?:h|m[^0]).*?h\K/-/; m/h/ or s/v/l3,/g; m/v/ or s/h([^h]*)/l$1,3/g; - my $dot = s/\.// && qq(); + my $dot = s/\.// && qq(); qq($dot) } qw(