--- a/TextColl.st	Sat Jul 31 13:00:10 1999 +0200
+++ b/TextColl.st	Mon Aug 02 12:14:17 1999 +0200
@@ -459,7 +459,7 @@
      In multiDisplay applications, this need NOT be the main transcript.
      But typically, this is the same as Transcript."
 
-    ^ self topView application class current transcript
+    ^ (self topView application class current transcript ? Stderr)
 
     "
      Transcript current flash
@@ -741,5 +741,5 @@
 !TextCollector class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/TextColl.st,v 1.57 1999-07-22 22:37:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/TextColl.st,v 1.58 1999-08-02 10:14:17 tm Exp $'
 ! !

--- a/TextCollector.st	Sat Jul 31 13:00:10 1999 +0200
+++ b/TextCollector.st	Mon Aug 02 12:14:17 1999 +0200
@@ -459,7 +459,7 @@
      In multiDisplay applications, this need NOT be the main transcript.
      But typically, this is the same as Transcript."
 
-    ^ self topView application class current transcript
+    ^ (self topView application class current transcript ? Stderr)
 
     "
      Transcript current flash
@@ -741,5 +741,5 @@
 !TextCollector class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.57 1999-07-22 22:37:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.58 1999-08-02 10:14:17 tm Exp $'
 ! !