Index: TECH/File/impl/FileAPI.cls.xml
===================================================================
diff -u -r1412 -r1479
--- TECH/File/impl/FileAPI.cls.xml	(.../FileAPI.cls.xml)	(revision 1412)
+++ TECH/File/impl/FileAPI.cls.xml	(.../FileAPI.cls.xml)	(revision 1479)
@@ -30,7 +30,9 @@
 
 <Method name="GeefFileNameGenerator">
 <ReturnType>TECH.File.FileNameGenerator</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.File.impl.FileNameGenerator).Instance()
+<Implementation><![CDATA[
+	Write "Echte filenamegen"
+	Quit ##class(TECH.File.impl.FileNameGenerator).Instance()
 ]]></Implementation>
 </Method>
 </Class>