--- a/RegressionTests__FileStreamTest.st	Sat Apr 01 15:23:41 2000 +0200
+++ b/RegressionTests__FileStreamTest.st	Sat Apr 01 15:24:32 2000 +0200
@@ -4,7 +4,7 @@
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
-	category:'Tests - Streams'
+	category:'Tests-Regression'
 !
 
 
@@ -108,18 +108,18 @@
     sz := 'testFile' asFilename fileSize.
 
     p := [
-        nLoop timesRepeat:[
-            self readFileExpecting:sz.
-        ].
+	nLoop timesRepeat:[
+	    self readFileExpecting:sz.
+	].
     ] forkAt:7.
 
     count := 0.
     [p isDead] whileFalse:[
-        Delay waitForMilliseconds:5.
-        p interruptWith:[count := count + 1].
+	Delay waitForMilliseconds:5.
+	p interruptWith:[count := count + 1].
     ].
     ('read file <1p> times; interrupted <2p> times' 
-        expandMacrosWith:nLoop with:count) printCR
+	expandMacrosWith:nLoop with:count) printCR
 
     "
      self test3
@@ -141,17 +141,17 @@
     s := PipeStream readingFrom:'sleep 5'.
 
     p := [
-        s readWait.
-        'readWait finished' printCR.
+	s readWait.
+	'readWait finished' printCR.
     ] forkAt:7.
 
     count := 0.
     [p isDead] whileFalse:[
-        Delay waitForMilliseconds:5.
-        p interruptWith:[count := count + 1].
+	Delay waitForMilliseconds:5.
+	p interruptWith:[count := count + 1].
     ].
     ('readWait interrupted <1p> times' 
-        expandMacrosWith:count) printCR.
+	expandMacrosWith:count) printCR.
 
     s close.
 
@@ -175,17 +175,17 @@
     s := PipeStream readingFrom:'sleep 5; echo hello'.
 
     p := [
-        s readWait.
-        'readWait finished' printCR.
+	s readWait.
+	'readWait finished' printCR.
     ] forkAt:7.
 
     count := 0.
     [p isDead] whileFalse:[
-        Delay waitForMilliseconds:5.
-        p interruptWith:[count := count + 1].
+	Delay waitForMilliseconds:5.
+	p interruptWith:[count := count + 1].
     ].
     ('readWait interrupted <1p> times' 
-        expandMacrosWith:count) printCR.
+	expandMacrosWith:count) printCR.
 
     s close.
 
@@ -209,16 +209,16 @@
     s := PipeStream readingFrom:'sleep 5'.
 
     p := [
-        'read: ' print. s nextLine printCR.
+	'read: ' print. s nextLine printCR.
     ] forkAt:7.
 
     count := 0.
     [p isDead] whileFalse:[
-        Delay waitForMilliseconds:5.
-        p interruptWith:[count := count + 1].
+	Delay waitForMilliseconds:5.
+	p interruptWith:[count := count + 1].
     ].
     ('read interrupted <1p> times' 
-        expandMacrosWith:count) printCR.
+	expandMacrosWith:count) printCR.
 
     s close.
 
@@ -242,16 +242,16 @@
     s := PipeStream readingFrom:'sleep 5; echo hello'.
 
     p := [
-        'read: ' print. s nextLine printCR.
+	'read: ' print. s nextLine printCR.
     ] forkAt:7.
 
     count := 0.
     [p isDead] whileFalse:[
-        Delay waitForMilliseconds:5.
-        p interruptWith:[count := count + 1].
+	Delay waitForMilliseconds:5.
+	p interruptWith:[count := count + 1].
     ].
     ('read interrupted <1p> times' 
-        expandMacrosWith:count) printCR.
+	expandMacrosWith:count) printCR.
 
     s close.