--- a/STXInstaller.st	Tue Nov 12 18:31:34 1996 +0100
+++ b/STXInstaller.st	Thu Jan 09 03:10:15 1997 +0100
@@ -271,10 +271,11 @@
                     self warn:('command error. Could not execute:\\' , cmd) withCRs.
                 ] ifFalse:[
                     [p atEnd] whileFalse:[
-                        [p readWaitWithTimeout:0.1] whileTrue:[].
-                        line := p nextLine.
-                        (line notNil and:[line notEmpty]) ifTrue:[
-                            commandTraceView showCR:(('  ' , line) asText emphasizeAllWith:(#color->Color red)).
+                        (p readWaitWithTimeout:0.1) ifFalse:[
+                            line := p nextLine.
+                            (line notNil and:[line notEmpty]) ifTrue:[
+                                commandTraceView showCR:(('  ' , line) asText emphasizeAllWith:(#color->Color red)).
+                            ]
                         ]
                     ].
                     p close.
@@ -292,7 +293,7 @@
     ^ true
 
     "Created: 17.7.1996 / 15:16:20 / cg"
-    "Modified: 18.7.1996 / 22:20:24 / cg"
+    "Modified: 9.1.1997 / 03:07:28 / cg"
 !
 
 createDirectories