ImageRdr.st
changeset 89 ea2bf46eb669
parent 81 4ba554473294
child 95 47ac85948d38
--- a/ImageRdr.st	Mon Feb 06 01:30:10 1995 +0100
+++ b/ImageRdr.st	Mon Feb 06 01:38:04 1995 +0100
@@ -23,7 +23,7 @@
 COPYRIGHT (c) 1991 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libview/Attic/ImageRdr.st,v 1.11 1994-11-17 14:29:36 claus Exp $
+$Header: /cvs/stx/stx/libview/Attic/ImageRdr.st,v 1.12 1995-02-06 00:37:26 claus Exp $
 '!
 
 !ImageReader class methodsFor:'documentation'!
@@ -44,7 +44,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libview/Attic/ImageRdr.st,v 1.11 1994-11-17 14:29:36 claus Exp $
+$Header: /cvs/stx/stx/libview/Attic/ImageRdr.st,v 1.12 1995-02-06 00:37:26 claus Exp $
 "
 !
 
@@ -146,7 +146,7 @@
 	inStream := FileStream readonlyFileNamed:aFilename.
     ].
     inStream isNil ifTrue:[
-	'open error on: ' print. aFilename errorPrintNewline. 
+	'IMGREADER: open error on: ' errorPrint. aFilename errorPrintNL. 
     ].
     ^ inStream
 ! !
@@ -328,7 +328,7 @@
     self primitiveFailed
 ! !
 
-!ImageReader class primitiveFunctions!
+!ImageReader primitiveFunctions!
 
 %{