comment
authorClaus Gittinger <cg@exept.de>
Tue, 07 Oct 2003 17:46:21 +0200
changeset 1827 ae4d319c0292
parent 1826 0a452034f661
child 1828 d90487a76176
comment
TIFFReader.st
--- a/TIFFReader.st	Tue Oct 07 17:16:23 2003 +0200
+++ b/TIFFReader.st	Tue Oct 07 17:46:21 2003 +0200
@@ -670,10 +670,30 @@
 
             ^ self
         ].
+        (tagType == 326) ifTrue:[
+            "BadFaxLines"
+
+    "/        'badFaxLines' print. value printNewline.
+
+            ^ self
+        ].
         (tagType == 327) ifTrue:[
-            "cleanfaxdata"
+            "CleanFaxData"
 
-    "/        'tilebytecounts' print. value printNewline.
+    "/        'cleanfaxdata' print. value printNewline.
+    "/        (value == 0) ifTrue:[
+    "/            'no lines with incorrect pixel counts' printNewline
+    "/        ] ifFalse:[
+    "/            (value == 1) ifTrue:[
+    "/                'incorrect lines were regenerated' printNewline
+    "/            ] ifFalse:[
+    "/                (value == 2) ifTrue:[
+    "/                    'incorrect lines were not regenerated' printNewline
+    "/                ] ifFalse:[
+    "/                    'cleanfaxdata invalid' printNewline
+    "/                ]
+    "/            ]
+    "/        ].
 
             ^ self
         ].
@@ -2219,7 +2239,7 @@
 !TIFFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.77 2003-10-07 15:16:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TIFFReader.st,v 1.78 2003-10-07 15:46:21 cg Exp $'
 ! !
 
 TIFFReader initialize!