Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -r1.169 -r1.170 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 13 Sep 2007 09:41:08 -0000 1.169 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 13 Sep 2007 20:01:15 -0000 1.170 @@ -639,7 +639,7 @@ } elseif {[regexp {^:(..):(.*)$} $link _ lang stripped_name]} { set link_type language } else { - # do we have a typed link? + # do we have a typed link? more than two chars... if {![regexp {^([^:][^:][^:]+):((..):)?(.+)$} $link _ \ link_type _ lang stripped_name]} { # must be an untyped link; defaults, in case the second regexp does not match either @@ -666,7 +666,7 @@ } default { set link_type link - set name $stripped_name + #set name $stripped_name } } }