changeset 574:2a1f3e0f0977

utillib: Adjust and add some HTML entity/Unicode conversions.
author Matti Hamalainen <ccr@tnsp.org>
date Fri, 20 Nov 2020 03:30:53 +0200
parents d004944d6afd
children 3530d38071c4
files utillib.tcl
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/utillib.tcl	Sun Sep 27 14:58:55 2020 +0300
+++ b/utillib.tcl	Fri Nov 20 03:30:53 2020 +0200
@@ -14,10 +14,12 @@
 append utl_html_ent_str "|&#228;|ä|&#229;|ö|&mdash;|--|&#039;|'|&ndash;|-|&#034;|\""
 append utl_html_ent_str "|&#124;|-|&#8217;|'|&uuml;|ü|&Uuml;|Ü|&bull;|*|&euro;|€"
 append utl_html_ent_str "|&rdquo;|\"|&#8216;|'|&#xe4;|ä|&#xb7;|*|&#174;|®|&acute;|'"
-append utl_html_ent_str "|&#246;|ö|&#xf6;|ö|&#35;|#|&apos;|'|&shy;||–|-|”|\""
+append utl_html_ent_str "|&#246;|ö|&#xf6;|ö|&#35;|#|&apos;|'|&shy;||–|-"
 append utl_html_ent_str "|&#x2026;|...|&hellip;|...|&#34;|\"|&#xad;||&#064;|#"
 append utl_html_ent_str "|&#xa0;| |&pound;|£|&#38;|&|&#158;|ž|&#196;|Ä|&#186;|º"
-append utl_html_ent_str "|&#8230;|...|&#47;|/|&#10;| |&#034;|\"|–|-"
+append utl_html_ent_str "|&#8230;|...|&#47;|/|&#10;| |&#034;|\"|&#x27;|\""
+append utl_html_ent_str "|‘|'|’|'|”|\""
+
 set utl_html_ent_list [split [encoding convertfrom "utf-8" $utl_html_ent_str] "|"]