--- a/XBMReader.st Tue Aug 21 17:52:31 2001 +0200
+++ b/XBMReader.st Wed Aug 22 18:38:44 2001 +0200
@@ -10,6 +10,8 @@
hereby transferred.
"
+"{ Package: 'stx:libview2' }"
+
ImageReader subclass:#XBMReader
instanceVariableNames:''
classVariableNames:''
@@ -72,8 +74,10 @@
|photometric clr0 clr1|
(anImage depth ~~ 1) ifTrue:[^ false.].
- (photometric := anImage photometric) == #blackIs0 ifTrue:[^ true].
- photometric == #whiteIs0 ifTrue:[^ true].
+
+ photometric := anImage photometric.
+ ((photometric == #blackIs0) or:[photometric == #whiteIs0]) ifTrue:[^ true].
+
photometric == #palette ifTrue:[
clr0 := anImage colorFromValue:0.
clr1 := anImage colorFromValue:1.
@@ -341,6 +345,6 @@
!XBMReader class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/XBMReader.st,v 1.41 1999-03-18 10:28:23 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/XBMReader.st,v 1.42 2001-08-22 16:38:44 cg Exp $'
! !
XBMReader initialize!