*** empty log message ***
authorclaus
Sat, 11 Dec 1993 02:28:10 +0100
changeset 8 0a804f13c332
parent 7 c5622a04d596
child 9 415b0178ecba
*** empty log message ***
FaceReader.st
--- 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:[