Index: svn/Setting.cls.xml
===================================================================
diff -u -r1674 -r1700
--- svn/Setting.cls.xml	(.../Setting.cls.xml)	(revision 1674)
+++ svn/Setting.cls.xml	(.../Setting.cls.xml)	(revision 1700)
@@ -1,7 +1,7 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="svn.Setting">
-<IncludeCode>svn</IncludeCode>
+<IncludeCode>svn,vhLib.Macro</IncludeCode>
 <Super>%RegisteredObject</Super>
 
 <Method name="Debug">
@@ -64,8 +64,16 @@
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	#dim IsBezig As %Boolean = 0
-	#dim JobID As %Integer = +$get($$$SVNGlobal("SourceControl","SVN","UnitTestInProcess"))
-	if JobID > 0 set IsBezig = ##class(TECH.Process).ExistsId(JobID)
+	#dim TestManager As %String = $O($$$SVNGlobal("SourceControl","SVN","UnitTestInProcess",""))
+	While TestManager '= "" {
+		#dim JobID As %Integer = +$get($$$SVNGlobal("SourceControl","SVN","UnitTestInProcess",TestManager))
+		if JobID > 0 {
+			set IsBezig = ##class(TECH.Process).ExistsId(JobID)
+			Set:($$$Not(IsBezig)) $$$SVNGlobal("SourceControl","SVN","UnitTestInProcess",TestManager) = 0
+		}
+		
+		Set TestManager = $O($$$SVNGlobal("SourceControl","SVN","UnitTestInProcess",TestManager))
+	}
 	quit IsBezig
 ]]></Implementation>
 </Method>