Index: CHUI/Test/TreeList.cls.xml
===================================================================
diff -u -r1074 -r2578
--- CHUI/Test/TreeList.cls.xml	(.../TreeList.cls.xml)	(revision 1074)
+++ CHUI/Test/TreeList.cls.xml	(.../TreeList.cls.xml)	(revision 2578)
@@ -2,8 +2,7 @@
 <Export generator="Cache" version="9">
 <Class name="CHUI.Test.TreeList">
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%CHUI.TForm</Super>
-<ClassDefinitionError>0</ClassDefinitionError>
+<Super>TCHUI.TForm</Super>
 
 <UDLText name="T">
 <Content><![CDATA[
@@ -24,11 +23,11 @@
 ==========================================================================================================================
 PROPERTIES                                                                                                               .
 ==========================================================================================================================</Description>
-<Type>%CHUI.TButton</Type>
+<Type>TCHUI.TButton</Type>
 </Property>
 
 <Property name="lstTest">
-<Type>%CHUI.TLijst</Type>
+<Type>TCHUI.TLijst</Type>
 </Property>
 
 <UDLText name="T">
@@ -46,11 +45,11 @@
 </UDLText>
 
 <Property name="pmTest">
-<Type>%CHUI.TPopup</Type>
+<Type>TCHUI.TPopup</Type>
 </Property>
 
 <Property name="rdSpecTree">
-<Type>%CHUI.TFrame</Type>
+<Type>TCHUI.TFrame</Type>
 </Property>
 
 <Parameter name="colCol1">
@@ -68,10 +67,10 @@
 	Set ..Caption="NewApplication"
 
 	//Buttons
-	Do ##class(%CHUI.TButton).CreateSet(%this,"btnButton1","Button1",21,66,,7,,,,,$$$alCenter)
+	Do ##class(TCHUI.TButton).CreateSet(%this,"btnButton1","Button1",21,66,,7,,,,,$$$alCenter)
 	Set ..btnButton1.OnClick=$LB(%this,"btnButton1Click")
 	//Lists
-	Do ##class(%CHUI.TLijst).CreateSet(%this,"lstTest","Test",2,2,19,40)
+	Do ##class(TCHUI.TLijst).CreateSet(%this,"lstTest","Test",2,2,19,40)
 
 	/*
 	Set ..rdSpecTree=..lstTest.CreateRowDef("SpecTree",$$$ftAddLijstRow)
@@ -92,7 +91,7 @@
 	//Do ..lstTest.Refresh()
 	
 	//Popup
-	Set ..pmTest=##class(%CHUI.TPopup).Create(%this,"pmTest","Test",4,50,5,20)
+	Set ..pmTest=##class(TCHUI.TPopup).Create(%this,"pmTest","Test",4,50,5,20)
 	Set ..pmTest.opMultiSelect=1
 	Do ..pmTest.BecomeTreeView(,,5)
 	
@@ -140,7 +139,7 @@
  ==========================================================================================================================
  EVENTs                                                                                                                   .
  ==========================================================================================================================</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis,ResultStr:%String</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis,ResultStr:%String</FormalSpec>
 <Implementation><![CDATA[
 	Set Cnt=0
 	Set (N1,N2,N3,N4)=""
@@ -159,7 +158,7 @@
 </Method>
 
 <Method name="btnButton1Click">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	s obj="", cnt=0
 	for  set obj=$zobjnext(obj) quit:(obj="")  do