--- trunk/base/src/port1.0/portconfigure.tcl 2014-05-03 00:22:36 UTC (rev 119651)
+++ trunk/base/src/port1.0/portconfigure.tcl 2014-05-03 00:41:19 UTC (rev 119652)
@@ -387,7 +387,7 @@
}
foreach {re fmt} $valid_compiler_ports {
if {[set matches [regexp -inline $re $compiler]] ne ""} {
- return [format $fmt {*}[lrange $matches 1 end]
+ return [format $fmt {*}[lrange $matches 1 end]]
}
}
return {}