--- a/PrinterContext.st Thu Nov 30 14:26:37 2006 +0100
+++ b/PrinterContext.st Thu Dec 14 12:28:55 2006 +0100
@@ -1059,12 +1059,12 @@
x := aRect right - (self "container font widthof:" stringWidthOf:aString).
y := aRect bottom "aPoint y - (self container font ascent)" - self getCharHeight.
]]]]].
- Transcript showCR: 'Original Pos: ', aPoint x printString, '@', aPoint y printString,
- ' Pos: ', x printString, '@', y printString,
- ' Text: ', aString.
+"/ Transcript showCR: 'Original Pos: ', aPoint x printString, '@', aPoint y printString,
+"/ ' Pos: ', x printString, '@', y printString,
+"/ ' Text: ', aString.
self displayString:aString at:(x@y).
- "Modified: / 20-10-2006 / 13:53:44 / User"
+ "Modified: / 14-12-2006 / 12:29:13 / User"
!
displayStringLines:anIndexedCollection from:startIndex to:endIndex in:aRectangle
@@ -1289,5 +1289,5 @@
!PrinterContext class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview2/PrinterContext.st,v 1.11 2006-11-30 13:26:37 fm Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/PrinterContext.st,v 1.12 2006-12-14 11:28:55 fm Exp $'
! !