--- a/FLIReader.st	Wed Nov 19 16:27:07 2003 +0100
+++ b/FLIReader.st	Wed Nov 19 16:28:36 2003 +0100
@@ -290,9 +290,8 @@
     width := header wordAt:(1+8).
     height := header wordAt:(1+10).
 
-    dimensionCallBack notNil ifTrue:[
-        dimensionCallBack value
-    ].
+    self reportDimension.
+
     flags := header wordAt:(1+14).
     speed := header wordAt:(1+16).
     speed <= 0 ifTrue:[
@@ -564,7 +563,7 @@
 !FLIReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/FLIReader.st,v 1.13 2003-09-01 14:47:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/FLIReader.st,v 1.14 2003-11-19 15:28:19 cg Exp $'
 ! !
 
 FLIReader initialize!