--- a/ObjectView.st Wed Mar 19 11:05:14 2014 +0100
+++ b/ObjectView.st Wed Mar 19 11:50:50 2014 +0100
@@ -1007,9 +1007,9 @@
get device coordinates
"
currentTransformation := gc transformation.
- transformation notNil ifTrue:[
- scale := transformation scale.
- p := transformation applyTo:p.
+ currentTransformation notNil ifTrue:[
+ scale := currentTransformation scale.
+ p := currentTransformation applyTo:p.
].
"
translate to screen
@@ -3532,10 +3532,10 @@
!ObjectView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.139 2014-02-18 16:21:26 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.140 2014-03-19 10:50:50 stefan Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.139 2014-02-18 16:21:26 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.140 2014-03-19 10:50:50 stefan Exp $'
! !