class: TabulatorSpecification
changed: #positionOfTab:on:
return an integer value
--- a/TabulatorSpecification.st Fri Jan 24 13:54:50 2014 +0100
+++ b/TabulatorSpecification.st Mon Jan 27 17:06:18 2014 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libwidg2' }"
Model subclass:#TabulatorSpecification
@@ -516,7 +515,7 @@
tabPositions isNil ifTrue:[^ nil].
unit := self pixelsPerUnitOn:aGC.
- pos := ((tabPositions at:index) * unit).
+ pos := ((tabPositions at:index) * unit) asInteger.
^ pos
!
@@ -546,5 +545,6 @@
!TabulatorSpecification class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/TabulatorSpecification.st,v 1.15 2000-11-14 18:03:56 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/TabulatorSpecification.st,v 1.16 2014-01-27 16:06:18 stefan Exp $'
! !
+