Index: TECH/Svg/Basis/Group.cls.xml
===================================================================
diff -u -r3730 -r3731
--- TECH/Svg/Basis/Group.cls.xml	(.../Group.cls.xml)	(revision 3730)
+++ TECH/Svg/Basis/Group.cls.xml	(.../Group.cls.xml)	(revision 3731)
@@ -114,15 +114,15 @@
 	{
 	do ..Texts.Insert(Element)
 	}
-	if Element.%IsA("APPS.Halux.PPS.ALUFrees.Svg.BasisElement.CrossDiag")
+	if Element.%IsA("TECH.Svg.Tooling.CrossDiag")
 	{
 	do ..CrossDiags.Insert(Element)
 	}
-	if Element.%IsA("APPS.Halux.PPS.ALUFrees.Svg.BasisElement.CrossVH")
+	if Element.%IsA("TECH.Svg.Tooling.CrossVH")
 	{
 	do ..CrossVHs.Insert(Element)
 	}
-	if Element.%IsA("APPS.Halux.PPS.ALUFrees.Svg.BasisElement.TCross")
+	if Element.%IsA("TECH.Svg.Tooling.TCross")
 	{
 	do ..TCrosss.Insert(Element)
 	}