Mercurial > hg > egg-tcls
changeset 92:f6f4595856ff
urllog: Cosmetics. Remove useless parenthesis.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Mon, 12 Sep 2011 17:21:25 +0300 |
parents | 6f4bfd8e9447 |
children | 4e02c0219afe |
files | urllog.tcl |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/urllog.tcl Mon Sep 12 17:20:53 2011 +0300 +++ b/urllog.tcl Mon Sep 12 17:21:25 2011 +0300 @@ -369,7 +369,7 @@ if {[regexp "(ftp|http|https)://(\[0-9\]{1,3})\\.(\[0-9\]{1,3})\\.(\[0-9\]{1,3})\\.(\[0-9\]{1,3})" $urlStr u_match u_prefix ni1 ni2 ni3 ni4]} { # Check if the IP is on local network - if {($ni1 == 127) || ($ni1 == 10) || ($ni1 == 192 && $ni2 == 168) || ($ni1 == 0)} { + if {$ni1 == 127 || $ni1 == 10 || ($ni1 == 192 && $ni2 == 168) || $ni1 == 0} { urllog_log "URL pointing to local or invalid network, ignored ($urlStr)." return 0 }