Mercurial > hg > egg-tcls
changeset 260:9300c92f0ccd
urllog: Remove few commented out debug lines.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Fri, 23 Jan 2015 09:45:52 +0200 |
parents | 0cd6303f4cbf |
children | e82ae84408ca |
files | urllog.tcl |
diffstat | 1 files changed, 0 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/urllog.tcl Fri Jan 23 09:26:22 2015 +0200 +++ b/urllog.tcl Fri Jan 23 09:45:52 2015 +0200 @@ -600,15 +600,11 @@ if {[regexp -nocase -- "<title>(.\*\?)</title>" $udata umatches urlTitle]} { # If character set conversion is required, do it now if {$uencoding != ""} { -# putlog "conversion requested from $uencoding" if {[catch {set urlTitle [encoding convertfrom $uencoding $urlTitle]} cerrmsg]} { urllog_log "Error in charset conversion: $cerrmsg" } } -# putlog "xxx: $uencoding : '$urlTitle'" -# return 0 - # Convert some HTML entities to plaintext and do some cleanup set utmp [urllog_convert_ent $urlTitle] regsub -all "\r|\n|\t" $utmp " " utmp