Mercurial > hg > egg-tcls
diff urllog.tcl @ 230:3e3756b113a1
urllog: Cleanup.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 01 Dec 2014 16:08:49 +0200 |
parents | c764d1706abf |
children | 059660980388 |
line wrap: on
line diff
--- a/urllog.tcl Mon Dec 01 16:08:34 2014 +0200 +++ b/urllog.tcl Mon Dec 01 16:08:49 2014 +0200 @@ -466,10 +466,9 @@ } ### Do we perform additional optional checks? - if {$urllog_check != 0 && (($http_tls_support != 0 && $u_proto == "https") || $u_proto == "http")} { - # Ok - } else { - # No optional checks, just add the URL, if it does not exist already + if {$urllog_check == 0 || !(($http_tls_support != 0 && $u_proto == "https") || $u_proto == "http")} { + # No optional checks, or it's not http/https. + # Just add the URL, if it does not exist already. urllog_addurl $urlStr $urlNick $urlHost $urlChan "" return 1 }