checkin from browser
authorClaus Gittinger <cg@exept.de>
Thu, 24 Apr 1997 18:09:06 +0200
changeset 1661 5b4c1f6ab871
parent 1660 67a3a6eab23a
child 1662 93de4bcdca85
checkin from browser
ImageRdr.st
ImageReader.st
--- a/ImageRdr.st	Thu Apr 24 18:05:36 1997 +0200
+++ b/ImageRdr.st	Thu Apr 24 18:09:06 1997 +0200
@@ -1563,6 +1563,7 @@
 
     depth := self bitsPerPixel.
     image := (Image implementorForDepth:depth) new.
+    image depth:depth.
     image 
         width:width 
         height:height
@@ -1574,7 +1575,7 @@
         mask:mask.
     ^ image
 
-    "Modified: 20.6.1996 / 17:09:04 / cg"
+    "Modified: 24.4.1997 / 14:28:04 / cg"
 !
 
 images
@@ -1815,5 +1816,5 @@
 !ImageReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/ImageRdr.st,v 1.47 1997-04-23 16:54:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/ImageRdr.st,v 1.48 1997-04-24 16:09:06 cg Exp $'
 ! !
--- a/ImageReader.st	Thu Apr 24 18:05:36 1997 +0200
+++ b/ImageReader.st	Thu Apr 24 18:09:06 1997 +0200
@@ -1563,6 +1563,7 @@
 
     depth := self bitsPerPixel.
     image := (Image implementorForDepth:depth) new.
+    image depth:depth.
     image 
         width:width 
         height:height
@@ -1574,7 +1575,7 @@
         mask:mask.
     ^ image
 
-    "Modified: 20.6.1996 / 17:09:04 / cg"
+    "Modified: 24.4.1997 / 14:28:04 / cg"
 !
 
 images
@@ -1815,5 +1816,5 @@
 !ImageReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.47 1997-04-23 16:54:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ImageReader.st,v 1.48 1997-04-24 16:09:06 cg Exp $'
 ! !