Index: vhTest/Fake/TECH/DateTime/DateTimeAPI.cls.xml
===================================================================
diff -u -r3103 -r3905
--- vhTest/Fake/TECH/DateTime/DateTimeAPI.cls.xml	(.../DateTimeAPI.cls.xml)	(revision 3103)
+++ vhTest/Fake/TECH/DateTime/DateTimeAPI.cls.xml	(.../DateTimeAPI.cls.xml)	(revision 3905)
@@ -50,6 +50,13 @@
 <Implementation><![CDATA[	Quit $zdatetime(..CurrentHorolog(),3)
 ]]></Implementation>
 </Method>
+
+<Method name="IsVandaag">
+<FormalSpec>Dag:%Date</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ((+..Horolog) = (+Dag))
+]]></Implementation>
+</Method>
 </Class>