Index: vhUnitTest/TECH/Exceptions/OngeldigeOptieKeuze/Test.cls.xml
===================================================================
diff -u -r2331 -r2415
--- vhUnitTest/TECH/Exceptions/OngeldigeOptieKeuze/Test.cls.xml	(.../Test.cls.xml)	(revision 2331)
+++ vhUnitTest/TECH/Exceptions/OngeldigeOptieKeuze/Test.cls.xml	(.../Test.cls.xml)	(revision 2415)
@@ -1,9 +1,11 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="vhUnitTest.TECH.Exceptions.OngeldigeOptieKeuze.Test">
+<ClassType/>
+<ProcedureBlock>0</ProcedureBlock>
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: Geeft de juiste exceptiecode weer.">
+<Method name="Test: Geeft de juiste exceptiecode weer">
 <Implementation><![CDATA[
 	#dim Exceptie As TECH.Exceptions.OngeldigeOptieKeuze = ##class(TECH.Exceptions.OngeldigeOptieKeuze).%New("")
 	Do $$$AssertEquals(Exceptie.GeefExceptionCode(),-1018)