Mercurial > hg > egg-tcls
changeset 131:b04ecf8bfb15
urllog: Fix some entity translations.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 24 Sep 2012 18:41:59 +0300 |
parents | 88ce9376f22d |
children | 1a6752b1a16a |
files | urllog.tcl |
diffstat | 1 files changed, 7 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/urllog.tcl Mon Sep 17 17:34:36 2012 +0300 +++ b/urllog.tcl Mon Sep 24 18:41:59 2012 +0300 @@ -143,12 +143,13 @@ set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"] -set urllog_ent_str "-|-|'|'|—|-|‏||—|-|–|--|‪||‬||" -append urllog_ent_str "‎||å|å|Å|Å|é|é|:|:| | |" -append urllog_ent_str "”|\"|“|\"|«|<<|»|>>|"|\"|" -append urllog_ent_str "ä|ä|ö|ö|Ä|Ä|Ö|Ö|&|&|<|<|>|>|" -append urllog_ent_str "ä|ä|å|ö|—|-|'|'|–|-|"|\"" -append urllog_ent_str "||-|’|'|ü|ü|Ü|Ü|•|*|€|€" +set urllog_ent_str "-|-|'|'|—|-|‏||—|-|–|--|‪||‬|" +append urllog_ent_str "|‎||å|å|Å|Å|é|é|:|:| | " +append urllog_ent_str "|”|\"|“|\"|«|<<|»|>>|"|\"|" +append urllog_ent_str "|ä|ä|ö|ö|Ä|Ä|Ö|Ö|&|&|<|<|>|>" +append urllog_ent_str "|ä|ä|å|ö|—|-|'|'|–|-|"|\"" +append urllog_ent_str "|||-|’|'|ü|ü|Ü|Ü|•|*|€|€" +append urllog_ent_str "|”|\"" set urllog_html_ent [split [encoding convertfrom "utf-8" $urllog_ent_str] "|"] ### Require packages