Index: TECH/Lock.cls.xml
===================================================================
diff -u -r977 -r979
--- TECH/Lock.cls.xml	(.../Lock.cls.xml)	(revision 977)
+++ TECH/Lock.cls.xml	(.../Lock.cls.xml)	(revision 979)
@@ -117,7 +117,6 @@
 </Method>
 
 <Method name="HeeftLock">
-<Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[	Quit (..GeefStatus() '= "")
 ]]></Implementation>