Index: mttroot/mtt/bin/trans/lbl2alias_txt2txt
==================================================================
--- mttroot/mtt/bin/trans/lbl2alias_txt2txt
+++ mttroot/mtt/bin/trans/lbl2alias_txt2txt
@@ -12,10 +12,13 @@
 ###############################################################
 ## Version control history
 ###############################################################
 ## $Id$
 ## $Log$
+## Revision 1.4  1998/07/03 15:21:26  peterg
+## Replace sub by gsub -- need to replace ALL ,
+##
 ## Revision 1.3  1998/07/03 13:49:03  peterg
 ## Flips the order of alias and name when $ is involved.
 ##
 ## Revision 1.2  1998/07/03 07:54:39  peterg
 ## Tidied
@@ -39,21 +42,23 @@
 echo "# Generated by MTT at `date`" >> $1_alias.txt
 
 #Write out the variables 
     grep '[%|#]ALIAS' $1_lbl.txt |\
     awk '{
-      if (match($2,"\\$")==0){
-        alias=$2; name =$3
-      }
-      else{
-        alias=$3; name =$2
-      }
-      gsub(",","__",alias); #Replace ,
-      n=split(alias,a,"|");
-      for (i=1; i<=n; i++)
-        print a[i] "\t" name;
-	 }
+      if (match($2,"/")==0){
+        if (match($2,"\\$")==0){
+          alias=$2; name =$3
+        }
+        else{
+          alias=$3; name =$2
+        }
+        gsub(",","__",alias); #Replace ,
+        n=split(alias,a,"|");
+        for (i=1; i<=n; i++)
+          print a[i] "\t" name;
+	   }
+      }
       END{
       print "###_END_OF_ALIAS_###"
      }' >> $1_alias.txt