Mercurial > hg > egg-tcls

diff urllog.tcl @ 160:e3e156911ab4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
urllog: Oops, fix a silly typobug.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 02 Jun 2014 15:52:58 +0300
parents f8571331003b
children eda776bcb7ed
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 "/"]