# HG changeset patch # User Matti Hamalainen # Date 1401713578 -10800 # Node ID e3e156911ab4cc538ae9307e80b262039cb6243f # Parent bbc7860c22a6d34744d22285bcf670fb20ba67ea urllog: Oops, fix a silly typobug. diff -r bbc7860c22a6 -r e3e156911ab4 urllog.tcl --- a/urllog.tcl Mon Jun 02 12:29:47 2014 +0300 +++ b/urllog.tcl Mon Jun 02 15:52:58 2014 +0300 @@ -415,7 +415,7 @@ ### Get URL protocol component set u_proto "" - regexp "(\[a-z\]+)://" $urlStr u_match u_proto] + regexp "(\[a-z\]+)://" $urlStr u_match u_proto ### Check the PORT (if the ":" is there) set u_record [split $urlStr "/"]