Index: mttroot/mtt/bin/trans/lbl2cmp_txt2m.pl
==================================================================
--- mttroot/mtt/bin/trans/lbl2cmp_txt2m.pl
+++ mttroot/mtt/bin/trans/lbl2cmp_txt2m.pl
@@ -232,11 +232,11 @@
     # file within the classes: ports, components then junctions.
 
     my ($name, $class, $i, $j, $target);
 
     $i = 0;
-    foreach $target ("port", "component", "1junction", "0junction") {
+    foreach $target ("port", "component", "0junction", "1junction") {
 	# get targets in lbl
 	for ($j = 1; $j < scalar @component_name_lbl_index; $j++) {
 	    $name  = $component_name_lbl_index[$j];
 	    $class = $component_class{$name};
 	    if ($class eq $target) {