Mercurial > hg > egg-tcls

changeset 318:5d886e2137d5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
urllog: Fix character set conversion a bit.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 21 Apr 2015 21:57:30 +0300
parents 994c398cb3fc
children 0abb738a2b1f
files urllog.tcl
diffstat 1 files changed, 3 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/urllog.tcl	Fri Mar 13 16:17:40 2015 +0200
+++ b/urllog.tcl	Tue Apr 21 21:57:30 2015 +0300
@@ -460,13 +460,9 @@
     # Check if the document has specified encoding
     # KLUDGE!
     set uencoding $uenc_http2
-    if {$uenc_doc != ""} {
-      # Does it differ from what HTTP says?
-      if {$uenc_http != "" && $uenc_doc != $uenc_http && $uenc_doc2 != $uenc_http2} {
-        # Yes, we will try reconverting
-        set uencoding $uenc_doc2
-      }
-    } elseif {$uenc_http == ""} {
+    if {$uencoding == "" && $uenc_doc2 != ""} {
+      set uencoding $uenc_doc2
+    } elseif {$uencoding == ""} {
       # If _NO_ known encoding of any kind, assume the default of iso8859-1    
       set uencoding "iso8859-1"
     }