DisplaySurface.st
changeset 6710 6ce1df2b8b60
parent 6692 939b2c5d4041
child 6770 207aa3bfe95e
--- a/DisplaySurface.st	Mon Dec 22 00:31:48 2014 +0100
+++ b/DisplaySurface.st	Mon Dec 22 00:33:19 2014 +0100
@@ -1046,8 +1046,8 @@
     |pX pY nW nH pO pC|
 
     transformation notNil ifTrue:[
-        pO := transformation applyTo:x@y.
-        pC := transformation applyTo:(x+w-1)@(y+h-1).
+        pO := transformation transformPoint:x@y.
+        pC := transformation transformPoint:(x+w-1)@(y+h-1).
         pX := pO x.
         pY := pO y.
         nW := pC x - pX + 1.
@@ -1192,8 +1192,8 @@
         self initGC
     ].
     transformation notNil ifTrue:[
-        pO := transformation applyTo:x@y.
-        pC := transformation applyTo:(x+w-1)@(y+h-1).
+        pO := transformation transformPoint:x@y.
+        pC := transformation transformPoint:(x+w-1)@(y+h-1).
         pX := pO x.
         pY := pO y.
         nW := pC x - pX + 1.
@@ -2595,8 +2595,12 @@
 
 !DisplaySurface class methodsFor:'documentation'!
 
+version
+    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.166 2014-12-21 23:33:19 cg Exp $'
+!
+
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.165 2014-12-21 21:36:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.166 2014-12-21 23:33:19 cg Exp $'
 ! !