PrinterContext.st
changeset 2275 6c2f8ba6b301
parent 2274 c0c247557f01
child 2300 4f9a576ecdc6
--- 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 $'
 ! !