Index: TECH/Svg/Services/CoordinatesService.cls.xml
===================================================================
diff -u -r3700 -r3702
--- TECH/Svg/Services/CoordinatesService.cls.xml	(.../CoordinatesService.cls.xml)	(revision 3700)
+++ TECH/Svg/Services/CoordinatesService.cls.xml	(.../CoordinatesService.cls.xml)	(revision 3702)
@@ -12,7 +12,6 @@
 	Set PuntenIterator = ##class(TECH.ArrayOneDimIterator).%New(.Punten)
 	If (..IsLijstEvenEnIngevuld(PuntenIterator))
 	{
-		Do ##class(Tools.Wlip).%New(238).String("het is even")
 		While (PuntenIterator.HasNext()) {
 			#dim EerstePuntVanCoordinaat As %Integer = PuntenIterator.Next()
 			#dim TweedePuntVanCoordinaat As %Integer = PuntenIterator.Next()
@@ -21,7 +20,6 @@
 		}
 		Quit CoordinatesList
 	} Else {
-		Do ##class(Tools.Wlip).%New(238).String("het is niet even of ingevuld")
 		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("het aantal punten is niet even of niet ingevuld"))
 	}
 ]]></Implementation>
@@ -43,6 +41,7 @@
 
 <Method name="IsLijstEvenEnIngevuld">
 <FormalSpec>PuntenIterator</FormalSpec>
+<Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	#dim Totaal As %Integer = 0