--- a/RegressionTests__ExternalStreamTest.st	Wed Jun 29 13:00:17 2016 +0000
+++ b/RegressionTests__ExternalStreamTest.st	Wed Jun 29 15:55:29 2016 +0200
@@ -1,4 +1,4 @@
-"{ Package: 'exept:regression' }"
+"{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
 
@@ -130,7 +130,7 @@
     s := externalReadStream on:h.
 
     '1234567890' do:[:eachExpected |
-        self assert:( s next == eachExpected ).
+	self assert:( s next == eachExpected ).
     ].
 
     s close.
@@ -157,10 +157,10 @@
     s binary.
 
     '1234567890' do:[:eachExpected |
-        |eachRead|
+	|eachRead|
 
-        eachRead := s next.
-        self assert:( eachRead == eachExpected asciiValue ).
+	eachRead := s next.
+	self assert:( eachRead == eachExpected asciiValue ).
     ].
 
     s close.
@@ -232,16 +232,16 @@
     self skipIf:externalWriteStream isBehavior not description:'skipped until new stream package is used'.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     h := OperatingSystem createFileForReadWrite:'xxx1'.
     s := externalWriteStream on:h.
 
     t := Time millisecondsToRun:[
-        1000000 timesRepeat:[
-            s nextPut:$a.
-        ].
+	1000000 timesRepeat:[
+	    s nextPut:$a.
+	].
     ].
     s close.
     Transcript showCR:'Time to write: ' , t printString.
@@ -253,15 +253,15 @@
     s := externalReadStream on:h.
 
     t := Time millisecondsToRun:[
-        1000000 timesRepeat:[
-            self assert:(s next == $a).
-        ].
+	1000000 timesRepeat:[
+	    self assert:(s next == $a).
+	].
     ].
     s close.
     Transcript showCR:'Time to read: ' , t printString.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     "
@@ -277,16 +277,16 @@
     self skipIf:externalWriteStream isBehavior not description:'skipped until new stream package is used'.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     h := OperatingSystem createFileForReadWrite:'xxx1'.
     s := externalWriteStream on:h.
 
     t := Time millisecondsToRun:[
-        100000 timesRepeat:[
-            s nextPutAll:'0123456789'.
-        ].
+	100000 timesRepeat:[
+	    s nextPutAll:'0123456789'.
+	].
     ].
     s close.
     Transcript showCR:'Time to write: ' , t printString.
@@ -298,15 +298,15 @@
     s := externalReadStream on:h.
 
     t := Time millisecondsToRun:[
-        100000 timesRepeat:[
-            self assert:((s next:10) = '0123456789').
-        ].
+	100000 timesRepeat:[
+	    self assert:((s next:10) = '0123456789').
+	].
     ].
     s close.
     Transcript showCR:'Time to read: ' , t printString.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     "
@@ -321,7 +321,7 @@
     self skipIf:externalWriteStream isBehavior not description:'skipped until new stream package is used'.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     h := OperatingSystem createFileForReadWrite:'xxx1'.
@@ -335,7 +335,7 @@
     self assert:( 'xxx1' asFilename contentsOfEntireFile = '1234567890' ).
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     "
@@ -350,7 +350,7 @@
     self skipIf:externalWriteStream isBehavior not description:'skipped until new stream package is used'.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     h := OperatingSystem createFileForReadWrite:'xxx1'.
@@ -368,7 +368,7 @@
     self assert:( 'xxx1' asFilename contentsOfEntireFile = '1234567890' ).
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     "
@@ -383,7 +383,7 @@
     self skipIf:externalWriteStream isBehavior not description:'skipped until new stream package is used'.
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     h := OperatingSystem createFileForReadWrite:'xxx1'.
@@ -402,7 +402,7 @@
     self assert:( 'xxx1' asFilename contentsOfEntireFile = '12345abcdefghij' ).
 
     ('xxx1' asFilename exists) ifTrue:[
-        'xxx1' asFilename delete
+	'xxx1' asFilename delete
     ].
 
     "