OldLauncher.st
changeset 105 520f37755229
parent 100 e481569337c2
child 106 f4eb10b3b463
--- a/OldLauncher.st	Fri May 19 06:07:34 1995 +0200
+++ b/OldLauncher.st	Tue Jun 06 06:21:18 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libtool/OldLauncher.st,v 1.28 1995-05-17 12:50:20 claus Exp $
+$Header: /cvs/stx/stx/libtool/OldLauncher.st,v 1.29 1995-06-06 04:20:37 claus Exp $
 '!
 
 !Launcher class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libtool/OldLauncher.st,v 1.28 1995-05-17 12:50:20 claus Exp $
+$Header: /cvs/stx/stx/libtool/OldLauncher.st,v 1.29 1995-06-06 04:20:37 claus Exp $
 "
 !
 
@@ -832,13 +832,8 @@
 
 startTranscript
     (Transcript isKindOf:TextCollector) ifTrue:[
-	"there is only one transcript"
-	Transcript topView isCollapsed ifTrue:[
-	    "it is iconified"
-	    Transcript topView unrealize.
-	    Transcript topView realize. 
-	].
-	Transcript topView raise
+	"there is only one transcript - rais it"
+	Transcript topView raiseDeiconified.
     ] ifFalse:[
 	Transcript := TextCollector newTranscript
     ]