Index: mttroot/mtt/bin/trans/awk/rbg_fig2m.awk
==================================================================
--- mttroot/mtt/bin/trans/awk/rbg_fig2m.awk
+++ mttroot/mtt/bin/trans/awk/rbg_fig2m.awk
@@ -10,10 +10,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.2  1996/08/04 20:05:25  peter
+## Included port components - eg SS:[1]
+##
 ## Revision 1.1  1996/08/04 20:01:58  peter
 ## Initial revision
 ##
 ###############################################################
 
@@ -98,11 +101,11 @@
 
 # A component string contain only alphanumeric  _ and :
   isa_plain_component = match(str, component_regexp)==0;
 
 # A port is an integer within []
-  isa_port = match(str, port_regexp)>0;
+  isa_port = exact_match(str, port_regexp)>0;
 
 # A port component is SS followed by : followed by a port string
   isa_port_component = 0;
   if (match(str, delimiter)) {
     split(str,a,delimiter);
@@ -111,12 +114,10 @@
       }
     
 # A component is a plain or a port component
   isa_component = isa_plain_component||isa_port_component;
 
-print str, isa_component;
-
 # Coordinates in fields 12 & 13
   x_coord = $12;
   y_coord = $13;
 
   if (isa_component) {