Changeset 81361

Timestamp:

07/29/11 16:44:27 (4 years ago)

Author:

jmr@…

Message:

clear portinfo before loading each new subport in portindex

File:

• trunk/base/src/port/portindex.tcl (modified) (1 diff)

trunk/base/src/port/portindex.tcl

@@ -147 +147 @@
             } else {
                 set prefix $save_prefix
+                array unset portinfo
                 array set portinfo [mportinfo $interp]
                 mportclose $interp