Mercurial > hg > egg-tcls

comparison urllog.tcl @ 131:b04ecf8bfb15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
urllog: Fix some entity translations.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 24 Sep 2012 18:41:59 +0300
parents d981f51b39c2
children 1a6752b1a16a
comparison
equal deleted inserted replaced
130:88ce9376f22d 131:b04ecf8bfb15
141 141
142 set urllog_tlds [split $urllog_tlds ","] 142 set urllog_tlds [split $urllog_tlds ","]
143 set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"] 143 set urllog_httprep [split "\@|%40|{|%7B|}|%7D|\[|%5B|\]|%5D" "|"]
144 144
145 145
146 set urllog_ent_str "&#45;|-|&#39;|'|—|-|&rlm;||&#8212;|-|&#8211;|--|&#x202a;||&#x202c;||" 146 set urllog_ent_str "&#45;|-|&#39;|'|—|-|&rlm;||&#8212;|-|&#8211;|--|&#x202a;||&#x202c;|"
147 append urllog_ent_str "&lrm;||&aring;|å|&Aring;|Å|&eacute;|é|&#58;|:|&nbsp;| |" 147 append urllog_ent_str "|&lrm;||&aring;|å|&Aring;|Å|&eacute;|é|&#58;|:|&nbsp;| "
148 append urllog_ent_str "&#8221;|\"|&#8220;|\"|&laquo;|<<|&raquo;|>>|&quot;|\"|" 148 append urllog_ent_str "|&#8221;|\"|&#8220;|\"|&laquo;|<<|&raquo;|>>|&quot;|\"|"
149 append urllog_ent_str "&auml;|ä|&ouml;|ö|&Auml;|Ä|&Ouml;|Ö|&amp;|&|&lt;|<|&gt;|>|" 149 append urllog_ent_str "|&auml;|ä|&ouml;|ö|&Auml;|Ä|&Ouml;|Ö|&amp;|&|&lt;|<|&gt;|>"
150 append urllog_ent_str "&#228;|ä|&#229;|ö|&mdash;|-|&#039;|'|&ndash;|-|&#034;|\"" 150 append urllog_ent_str "|&#228;|ä|&#229;|ö|&mdash;|-|&#039;|'|&ndash;|-|&#034;|\""
151 append urllog_ent_str "&#124;|-|&#8217;|'|&uuml;|ü|&Uuml;|Ü|&bull;|*|&euro;|€" 151 append urllog_ent_str "|&#124;|-|&#8217;|'|&uuml;|ü|&Uuml;|Ü|&bull;|*|&euro;|€"
152 append urllog_ent_str "|&rdquo;|\""
152 set urllog_html_ent [split [encoding convertfrom "utf-8" $urllog_ent_str] "|"] 153 set urllog_html_ent [split [encoding convertfrom "utf-8" $urllog_ent_str] "|"]
153 154
154 ### Require packages 155 ### Require packages
155 package require sqlite3 156 package require sqlite3
156 package require http 157 package require http