Index: Tools/DebugWindow.cls.xml
===================================================================
diff -u -r3433 -r3468
--- Tools/DebugWindow.cls.xml	(.../DebugWindow.cls.xml)	(revision 3433)
+++ Tools/DebugWindow.cls.xml	(.../DebugWindow.cls.xml)	(revision 3468)
@@ -9,7 +9,7 @@
 
 <Method name="Activate">
 <Implementation><![CDATA[
-	Lock (^Tools.DebugWindow(..ClientIP)#"S"):0
+	Lock +(^Tools.DebugWindow(..ClientIP)#"S"):0
 	if $Test = 0  {
 		Do ##Class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.IllegalUsageException).%New("Er zit een exclusive lock op ^Tools.DebugWindow("_..ClientIP_")"))
 	}
@@ -56,7 +56,7 @@
 <FormalSpec>IP:%String</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
-	Lock ^Tools.DebugWindow(IP):0
+	Lock +^Tools.DebugWindow(IP):0
 	#dim IsActive = $$$Not($Test)
 	;;als er niemand luistert is de lock gelukt, dus unlocken
 	Lock -^Tools.DebugWindow(IP):0