--- a/TIFFReader.st Fri Aug 25 18:07:24 2017 +0200
+++ b/TIFFReader.st Fri Aug 25 18:14:00 2017 +0200
@@ -1074,40 +1074,43 @@
Verbose == true ifTrue:[
Logger info:' compression: %1' with:value
].
-
^ self
].
+
(tagType == 262) ifTrue:[
"photometric"
+ |p|
(value between:0 and:10) ifTrue:[
- photometric := #(
- whiteIs0 "/ 0 - grayscale or monochrome; faxes
- blackIs0 "/ 1 - grayscale or monochrome; faxes
- rgb "/ 2
- palette "/ 3
- transparencyMask "/ 4
- cmyk "/ 5 - color separations
- YCbCr "/ 6 - CCIR 601
- nil "/ 7
- CIElab "/ 8 - 1976 CIE L*a*b*
- ICClab "/ 9 - ICC L*a*b*
- ITUlab "/ 10 - see ITO-T- Rec T42 (RFC 2301)
- ) at:(value + 1)
+ p :=
+ #(
+ whiteIs0 "/ 0 - grayscale or monochrome; faxes
+ blackIs0 "/ 1 - grayscale or monochrome; faxes
+ rgb "/ 2
+ palette "/ 3
+ transparencyMask "/ 4
+ cmyk "/ 5 - color separations
+ YCbCr "/ 6 - CCIR 601
+ nil "/ 7
+ CIElab "/ 8 - 1976 CIE L*a*b*
+ ICClab "/ 9 - ICC L*a*b*
+ ITUlab "/ 10 - see ITO-T- Rec T42 (RFC 2301)
+ ) at:(value + 1)
] ifFalse:[
(value == 32803) ifTrue:[
- photometric := #ColorFilterArray "/ camera rw format
+ p := #ColorFilterArray "/ camera rw format
].
(value == 32844) ifTrue:[
- photometric := #PixarLogL
+ p := #PixarLogL
].
(value == 32845) ifTrue:[
- photometric := #PixarLogLuv
+ p := #PixarLogLuv
].
(value == 34892) ifTrue:[
- photometric := #LinearRaw "/ camera rw format
+ p := #LinearRaw "/ camera rw format
].
].
+ photometric := p.
Verbose == true ifTrue:[
Logger info:' photometric: %1 (%2)' with:photometric with:value
].