--- a/FaceReader.st Sat Dec 11 02:26:27 1993 +0100
+++ b/FaceReader.st Sat Dec 11 02:28:10 1993 +0100
@@ -24,7 +24,7 @@
this class knows how to read face files.
-$Header: /cvs/stx/stx/libview2/FaceReader.st,v 1.3 1993-10-13 00:45:33 claus Exp $
+$Header: /cvs/stx/stx/libview2/FaceReader.st,v 1.4 1993-12-11 01:28:10 claus Exp $
written spring 93 by claus
'!
@@ -41,11 +41,8 @@
val "{ Class: SmallInteger }"
inHeader s depth|
- inStream := FileStream readonlyFileNamed:aFileName.
- inStream isNil ifTrue:[
- 'open error' printNewline.
- ^ nil
- ].
+ inStream := self class streamReadingFile:aFileName.
+ inStream isNil ifTrue:[^ nil].
line := inStream nextLine.
line isNil ifTrue:[