Mercurial > hg > egg-tcls
changeset 210:52cadf5a12b6
urllog: Disable some debug logging.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Fri, 19 Sep 2014 22:19:39 +0300 |
parents | 6b1a579fb288 |
children | bf5818edbff9 |
files | urllog.tcl |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/urllog.tcl Fri Sep 19 21:30:03 2014 +0300 +++ b/urllog.tcl Fri Sep 19 22:19:39 2014 +0300 @@ -536,7 +536,7 @@ # KLUDGE! set uencoding $uenc_http2 - putlog "got charsets : http='$uenc_http', doc='$uenc_doc' / sanitized http='$uenc_http2', doc='$uenc_doc2'" +# putlog "got charsets : http='$uenc_http', doc='$uenc_doc' / sanitized http='$uenc_http2', doc='$uenc_doc2'" # Check if the document has specified encoding @@ -556,7 +556,7 @@ if {[regexp -nocase -- "<title>(.\*\?)</title>" $udata umatches urlTitle]} { # If character set conversion is required, do it now if {$uencoding != ""} { - putlog "conversion requested from $uencoding" +# putlog "conversion requested from $uencoding" if {[catch {set urlTitle [encoding convertfrom $uencoding $urlTitle]} cerrmsg]} { urllog_log "Error in charset conversion: $cerrmsg" }