Index: TECH/Background/impl/BackgroundJob.cls.xml
===================================================================
diff -u -r1090 -r1162
--- TECH/Background/impl/BackgroundJob.cls.xml	(.../BackgroundJob.cls.xml)	(revision 1090)
+++ TECH/Background/impl/BackgroundJob.cls.xml	(.../BackgroundJob.cls.xml)	(revision 1162)
@@ -31,12 +31,13 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	Lock +$$$BackgroundJobGlobal(..%ClassName(1)):0
-	
-	while '..IsStopped() {
-		Do ..StartTask()	
-		Hang ..#HangTime
+	if $TEST {
+		while '..IsStopped() {
+			Do ..StartTask()	
+			Hang ..#HangTime
+		}
+		set $$$BackgroundJobGlobal(..%ClassName(1)) = $$$BackgroundJobStopped
 	}
-	set $$$BackgroundJobGlobal(..%ClassName(1)) = $$$BackgroundJobStopped
 	Lock -$$$BackgroundJobGlobal(..%ClassName(1))
 ]]></Implementation>
 </Method>