Mercurial > hg > egg-tcls
changeset 160:e3e156911ab4
urllog: Oops, fix a silly typobug.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Mon, 02 Jun 2014 15:52:58 +0300 |
| parents | bbc7860c22a6 |
| children | 2c9db9a29429 |
| files | urllog.tcl |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- 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 "/"]