Mercurial > hg > egg-tcls
changeset 294:2bb9bcfb104a
Cosmetics.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 26 Jan 2015 14:04:17 +0200 |
parents | 42ba48d54324 |
children | 141bb4a2b76f |
files | urllog.tcl |
diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/urllog.tcl Mon Jan 26 14:03:41 2015 +0200 +++ b/urllog.tcl Mon Jan 26 14:04:17 2015 +0200 @@ -145,6 +145,7 @@ return $uencoding } + proc urllog_clean_title {utitle} { if {[catch {set utitle [encoding convertto "iso8859-15" $utitle]} cerrmsg]} { putlog "Could not convert title encoding: $cerrmsg" @@ -152,6 +153,7 @@ return $utitle } + #------------------------------------------------------------------------- set urllog_shorturl_str "ABCDEFGHIJKLNMOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789"