Mercurial > hg > egg-tcls

diff urllog.tcl @ 136:76eefceb2b90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix additional checks for HTTPS urls.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 04 Jun 2013 13:23:52 +0300
parents 9f290e1ee738
children 52350ed97775
line wrap: on
line diff
--- a/urllog.tcl	Tue Jun 04 13:23:14 2013 +0300
+++ b/urllog.tcl	Tue Jun 04 13:23:52 2013 +0300
@@ -468,7 +468,9 @@
   }
 
   ### Do we perform additional optional checks?
-  if {$urllog_check == 0 || ($http_tls_support == 0 && $u_proto == "https") || $u_proto != "http"} {
+  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
     urllog_addurl $urlStr $urlNick $urlHost $urlChan ""
     return 1