Index: TECH/Svg/Basis/Path.cls.xml
===================================================================
diff -u -r3647 -r3653
--- TECH/Svg/Basis/Path.cls.xml	(.../Path.cls.xml)	(revision 3647)
+++ TECH/Svg/Basis/Path.cls.xml	(.../Path.cls.xml)	(revision 3653)
@@ -21,26 +21,16 @@
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>CoordinatesList:%ListOfObjects(ELEMENT="TECH.Svg.Basis.Path.Coordinates"),Aflsluiten:%Boolean=1</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
-<Implementation><![CDATA[
-	If (Aflsluiten =0) { 
-		Do ..VoegToeInhoudD(CoordinatesList)
-	}
-	Else {
-		Do ..VoegToeInhoudAfgelsotenD(CoordinatesList)
-	}
-	
-	Quit $$$OK
+<Implementation><![CDATA[	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="VoegToeInhoudD">
 <FormalSpec>CoordinatesList:%ListOfObjects(ELEMENT="TECH.Svg.Basis.Path.Coordinates")</FormalSpec>
-<Private>1</Private>
 <Implementation><![CDATA[
 	Set CoordinatesIterator = ##class(TECH.ListIterator).%New(CoordinatesList)
 	// Voor de eerste Coordinates
@@ -58,7 +48,6 @@
 
 <Method name="VoegToeInhoudAfgelsotenD">
 <FormalSpec>CoordinatesList:%ListOfObjects(ELEMENT="TECH.Svg.Basis.Path.Coordinates")</FormalSpec>
-<Private>1</Private>
 <Implementation><![CDATA[
 	If (CoordinatesList.Count() <3) {
 	Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Het afsluiten van een figuur is pas praktisch als er meer dan 2 coördinaten aanwezig zijn."))