--- a/GIFReader.st	Wed Nov 19 16:27:07 2003 +0100
+++ b/GIFReader.st	Wed Nov 19 16:28:36 2003 +0100
@@ -304,9 +304,7 @@
     width := aStream nextShortMSB:false.
     height := aStream nextShortMSB:false.
 
-    dimensionCallBack notNil ifTrue:[
-        dimensionCallBack value:self
-    ].
+    self reportDimension.
 
 "/
 "/    'width ' print. width printNewline.
@@ -980,7 +978,7 @@
 !GIFReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.88 2003-09-12 11:40:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/GIFReader.st,v 1.89 2003-11-19 15:28:00 cg Exp $'
 ! !
 
 GIFReader initialize!