--- a/Depth32Image.st Sat Mar 05 15:26:59 2016 +0100
+++ b/Depth32Image.st Sun Mar 06 00:02:27 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1995 by Claus Gittinger
All Rights Reserved
@@ -872,7 +870,7 @@
blueBitsOf:pixel
"given a pixel-value, return the blue component as byteValue (0..255)"
- photometric == #rgba ifTrue:[
+ ((photometric == #rgba) or:[photometric == #rgb]) ifTrue:[
"r,g,b,a"
^ (pixel bitShift:-8) bitAnd:16rFF.
].
@@ -920,7 +918,7 @@
greenBitsOf:pixel
"given a pixel-value, return the green component as byteValue (0..255)"
- photometric == #rgba ifTrue:[
+ ((photometric == #rgba) or:[photometric == #rgb]) ifTrue:[
"r,g,b,a"
^ (pixel bitShift:-16) bitAnd:16rFF.
].
@@ -964,7 +962,7 @@
redBitsOf:pixel
"given a pixel-value, return the red component as byteValue (0..255)"
- photometric == #rgba ifTrue:[
+ ((photometric == #rgba) or:[photometric == #rgb]) ifTrue:[
"r,g,b,a"
^ (pixel bitShift:-24) bitAnd:16rFF.
].