WindowsIconReader.st
changeset 1790 41f36b5a29c3
parent 1759 f52382e5a9b8
child 1805 93f557cbe600
--- a/WindowsIconReader.st	Mon Aug 18 14:13:55 2003 +0200
+++ b/WindowsIconReader.st	Tue Aug 19 00:33:11 2003 +0200
@@ -363,9 +363,9 @@
 
     |reader stream|
 
-    stream := self streamReadingFile:aFilename.
+    stream := self class streamReadingFile:aFilename.
     stream isNil ifTrue:[^ nil].
-    reader := (self new) fromOS2Stream:stream.
+    reader := (self class new) fromOS2Stream:stream.
     stream close.
     reader notNil ifTrue:[^ reader image].
     ^ nil
@@ -547,7 +547,7 @@
 
     stream := self class streamReadingFile:aFilename.
     stream isNil ifTrue:[^ nil].
-    reader := (self new) fromWindowsBMPStream:stream.
+    reader := (self class new) fromWindowsBMPStream:stream.
     stream close.
     reader notNil ifTrue:[^ reader image].
     ^ nil
@@ -720,7 +720,7 @@
 
     stream := self class streamReadingFile:aFilename.
     stream isNil ifTrue:[^ nil].
-    reader := (self new) fromWindowsICOStream:stream.
+    reader := (self class new) fromWindowsICOStream:stream.
     stream close.
     reader notNil ifTrue:[^ reader image].
     ^ nil
@@ -1104,7 +1104,7 @@
 !WindowsIconReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.54 2003-05-05 16:50:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.55 2003-08-18 22:33:11 cg Exp $'
 ! !
 
 WindowsIconReader initialize!