Index: APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml
===================================================================
diff -u -r61615 -r61901
--- APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml	(.../Kaderdeur.cls.xml)	(revision 61615)
+++ APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml	(.../Kaderdeur.cls.xml)	(revision 61901)
@@ -67,13 +67,11 @@
 	//Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Status)
 	Do WRITE^XMLWRITE(DevObj, $$ObjToXML^vhLib(..SvgBox))
 	
-	
 	#dim KadVertaler As Prod.GADef.KadVertaler = ##class(Prod.GADef.KadVertaler).%New(Taal)
 	#dim Description As %String =KadVertaler.Vertaal("Vooraanzicht")_": "
  	Set Description = Description_KadVertaler.Vertaal("lblAfmeting_Hoogte_Kort")_":"_KaderdeurObject.Hoogte_" mm x "_KadVertaler.Vertaal("lblAfmeting_Breedte_Kort")_":"_KaderdeurObject.Breedte_" mm"
  	Set Description = Description_$S(KaderdeurObject.Toepassing.ItemID="GL":"", 1:"  "_KaderdeurObject.ProfAfw.ItemID)
  	Set Description = Description_$S(KaderdeurObject.Vulling.Vulling="":"", 1:"  "_KaderdeurObject.Vulling.Vulling.OmsGet(Taal))
- 	Do ##class(Tools.Wlip).%New(238).String(Description)
  	#dim TextBox As TECH.Svg.Basis.Text = ..BasisElementFactory.MaakText(0,0,Description)
  	Do WRITE^XMLWRITE(DevObj, $$ObjToXML^vhLib(TextBox))
 ]]></Implementation>