# HG changeset patch # User Matti Hamalainen # Date 1422273857 -7200 # Node ID 2bb9bcfb104a7acbdd1d8f1fd0947539fa35dfd4 # Parent 42ba48d54324bab55843db769907352bb1da8a3c Cosmetics. diff -r 42ba48d54324 -r 2bb9bcfb104a urllog.tcl --- 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"