Index: TECH/PubSub/WachtendeEventVerwerker.cls.xml
===================================================================
diff -u -r2171 -r2174
--- TECH/PubSub/WachtendeEventVerwerker.cls.xml (.../WachtendeEventVerwerker.cls.xml) (revision 2171)
+++ TECH/PubSub/WachtendeEventVerwerker.cls.xml (.../WachtendeEventVerwerker.cls.xml) (revision 2174)
@@ -6,16 +6,14 @@
1
quit.") Quit
+ Lock +^WachtendEventVerwerker:0 Else Quit
do ..%New().StartVerwerking()
Lock -^WachtendEventVerwerker
]]>