--- a/ImageEditView.st	Sat Feb 07 17:55:42 1998 +0100
+++ b/ImageEditView.st	Sat Feb 07 18:09:38 1998 +0100
@@ -595,7 +595,12 @@
              ifTrue:  [(firstPoint y - currentPoint y) > 0 ifTrue: ["4"1@1] ifFalse: ["3"1@0]]
              ifFalse: [(firstPoint y - currentPoint y) > 0 ifTrue: ["1"0@1] ifFalse: ["2"0@0]].
 
-        self drawCursorAt: p withLabel: ((firstPoint//magnification - whichQuarter + 1) printString, ' to: ', (currentPoint//magnification + whichQuarter) printString).
+        self drawCursorAt: p withLabel: 
+            ((firstPoint//magnification - whichQuarter + 1) printString, 
+            ' to: ', 
+            (currentPoint//magnification + whichQuarter) printString),
+            ' (extent: ',
+            (currentExtent//magnification) printString, ')'.
 
         currentPoint ~= lastCurrentPoint ifTrue:
         [          
@@ -983,5 +988,5 @@
 !ImageEditView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.67 1998-02-06 17:05:12 tz Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.68 1998-02-07 17:09:38 tz Exp $'
 ! !