handle Text items in xOfCol...
--- a/ListView.st Fri Jul 19 20:52:41 1996 +0200
+++ b/ListView.st Fri Jul 19 20:53:39 1996 +0200
@@ -1923,8 +1923,9 @@
(lineSize == 0) ifTrue:[
^ (tcol * fontWidth) + textStartLeft
].
+
(lineSize < col) ifTrue:[
- ^ (font widthOf:line)
+ ^ (line widthOn:self)
+ (fontWidth * (tcol - lineSize))
+ textStartLeft
].
@@ -1933,7 +1934,7 @@
].
^ ((line copyTo:tcol) widthOn:self) + textStartLeft
- "Modified: 22.5.1996 / 15:53:56 / cg"
+ "Modified: 19.7.1996 / 20:38:54 / cg"
!
yOfVisibleLine:visLineNr
@@ -3262,5 +3263,5 @@
!ListView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.97 1996-07-05 16:03:38 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.98 1996-07-19 18:53:39 cg Exp $'
! !