latin: plain html output instead of FormatChar module

[sheet.git] / writing-latn.inc.pl

diff --git a/writing-latn.inc.pl b/writing-latn.inc.pl
index 5759439a1aa6298180681dc66766636169cc6d0e..6c0edad04f1d9589d968fa3c28b90cde0f640bf1 100644 (file)
--- a/writing-latn.inc.pl
+++ b/writing-latn.inc.pl
@@ -141,8 +141,7 @@ my %C = qw(red #EC1C24  blue #3953A3  yellow #F9EC31  black #231F20);
                local $_ = $_;
                s/[1-4]\K(?=[4-9])/ /;
                tr/1-9/↙←↖↑↗→↘↓/;
                local $_ = $_;
                s/[1-4]\K(?=[4-9])/ /;
                tr/1-9/↙←↖↑↗→↘↓/;

-               s{(\S)(?=.)}{<span style="position:absolute">$1</span>}
-                       or s/^/<span>/ and $_ .= '</span>';
+               s{(\S)(?=.)}{<span style="position:absolute">$1</span>};

                $_
        }
        qw(
                $_
        }
        qw(