Index: APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml
===================================================================
diff -u -r61908 -r61997
--- APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml	(.../Kaderdeur.cls.xml)	(revision 61908)
+++ APPS/Halux/PPS/ALUFrees/Svg/Kaderdeur.cls.xml	(.../Kaderdeur.cls.xml)	(revision 61997)
@@ -55,7 +55,6 @@
 	Set ..HoekverbinderToevoeger = $$$Inject(HoekverbinderToevoeger, ##class(APPS.Halux.PPS.ALUFrees.Svg.Kaderdeur.HoekverbinderToevoeger).%New())
 	Set ..SchuinehoekenToevoeger = $$$Inject(SchuinehoekenToevoeger, ##class(APPS.Halux.PPS.ALUFrees.Svg.Kaderdeur.SchuineHoekenToevoeger).%New())
 	
-
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -73,6 +72,7 @@
  	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))
  	#dim TextBox As TECH.Svg.Basis.Text = ..BasisElementFactory.MaakText(0, 0, Description)
+ 	
  	Do WRITE^XMLWRITE(DevObj, $$ObjToXML^vhLib(TextBox))
 ]]></Implementation>
 </Method>
@@ -136,9 +136,9 @@
 	  	Set ProfPlaats  = KaderdeurObject.Onderdelen.GetNext("")
 	  	#dim LosOffset As %Integer = KaderdeurObject.ProfType.Breedte
 		If (ProfPlaats = "PR") {
-			Set LosOffset = (Breedte\1) - ((Breedte - (2*LosOffset)) \ 1 + (LosOffset))
+			Set LosOffset = (Breedte\1) - ((Breedte - (2 * LosOffset)) \ 1 + (LosOffset))
 		} ElseIf (ProfPlaats = "PO") {
-			Set LosOffset = (Breedte\1) - ((Breedte - (2*LosOffset))\1 + (LosOffset))
+			Set LosOffset = (Breedte\1) - ((Breedte - (2 * LosOffset))\1 + (LosOffset))
 		}
 		Set KaderGroup = ..KaderToevoeger.VulDrieRects(KaderdeurObject, Breedte, Hoogte, 1)
 		#Dim KaderdeurProfiel As TECH.Svg.Basis.Path = ..LosProfielToevoeger.LosProfiel(Breedte, Hoogte, LosOffset, ProfPlaats)
@@ -169,7 +169,7 @@
 	If $$$Not(KaderdeurObject.Toepassing.ItemID = "GL") {
 		Set Beslag = ##class(APPS.Halux.PPS.ALUFrees.Svg.KaderdeurElement.Beslag.Beslagen).%New()
 		Do Beslag.VoegToeBeslagen(KaderdeurObject)
-		Do ..ElementToevoeger.VoegToeElement(..SvgBox,Beslag.Group)
+		Do ..ElementToevoeger.VoegToeElement(..SvgBox, Beslag.Group)
 	}
 ]]></Implementation>
 </Method>