--- a/TIFFRdr.st	Sat Sep 14 11:03:06 1996 +0200
+++ b/TIFFRdr.st	Sat Sep 14 17:12:08 1996 +0200
@@ -1507,6 +1507,10 @@
         ^ nil
     ].
 
+    dimensionCallBack notNil ifTrue:[
+        dimensionCallBack value:self
+    ].
+
     "given all the information, read the bits"
 
     rowsPerStrip isNil ifTrue:[
@@ -1560,7 +1564,7 @@
     ].
     ^ result
 
-    "Modified: 13.9.1996 / 18:43:01 / cg"
+    "Modified: 14.9.1996 / 17:09:07 / cg"
 ! !
 
 !TIFFReader methodsFor:'writing to file'!
@@ -1656,6 +1660,6 @@
 !TIFFReader  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.40 1996-09-13 16:45:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/TIFFRdr.st,v 1.41 1996-09-14 15:12:08 cg Exp $'
 ! !
 TIFFReader initialize!