--- a/TextCollector.st	Tue Sep 17 00:12:54 1996 +0200
+++ b/TextCollector.st	Tue Sep 17 00:36:08 1996 +0200
@@ -337,7 +337,7 @@
             ] ifFalse:[
                 p := windowGroup process
             ].
-            (Processor isSystemProcess:p) ifTrue:[
+            (p isNil or:[Processor isSystemProcess:p]) ifTrue:[
                 self endEntry
             ] ifFalse:[
                 Processor addTimedBlock:flushBlock for:p afterSeconds:timeDelay.
@@ -505,5 +505,5 @@
 !TextCollector  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.32 1996-09-16 22:12:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.33 1996-09-16 22:36:08 cg Exp $'
 ! !