Index: mttroot/mtt/bin/trans/m/rbg2abg.m
==================================================================
--- mttroot/mtt/bin/trans/m/rbg2abg.m
+++ mttroot/mtt/bin/trans/m/rbg2abg.m
@@ -3,10 +3,14 @@
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% Version control history
 % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % %% $Id$
 % %% $Log$
+% %% Revision 1.22  1997/09/18 19:49:37  peterg
+% %% Added test for uniquness of bonds on a component -- if non-unique
+% %% implies same component at both ends of a bond.
+% %%
 % %% Revision 1.21  1997/09/16  15:14:14  peterg
 % %% Added warning if a component has no bonds.
 % %%
 % %% Revision 1.20  1997/08/18  19:39:48  peterg
 % %% Now generates (exampaded) port_bond list correctely
@@ -397,11 +401,11 @@
   end;
   
   %Two port defaults
   if (n_comp_bonds==2)&(n_unsorted_ports==0)
     if direction(1)==direction(2) % Wrong way for default
-      mtt_info(['Two-port ', comp_name, ' (', comp_type, ') does not have through-pointing arrows'], infofile);
+      % mtt_info(['Two-port ', comp_name, ' (', comp_type, ') does not have through-pointing arrows'], infofile);
     end;
     if direction(1)==1 %in
       % mtt_info([comp_name, ' in'],infofile);
       unsorted_port_list = ['in';'out'];
     else %reverse the order