--- a/WindowingTransformation.st	Thu Jan 22 15:23:48 2015 +0100
+++ b/WindowingTransformation.st	Thu Jan 22 15:23:53 2015 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libview' }"
 
+"{ NameSpace: Smalltalk }"
+
 ScaleTransform variableFloatSubclass:#WindowingTransformation
 	instanceVariableNames:'translation'
 	classVariableNames:''
@@ -533,7 +535,7 @@
     |trans|
 
     trans := translation asPoint.
-    ^ Point x:(trans x negated) y:trans y negated
+    ^ Point x:(trans x negated) y:(trans y negated)
 ! !
 
 !WindowingTransformation methodsFor:'testing'!
@@ -623,10 +625,10 @@
 !WindowingTransformation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowingTransformation.st,v 1.26 2014-12-21 22:24:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowingTransformation.st,v 1.27 2015-01-22 14:23:53 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/WindowingTransformation.st,v 1.26 2014-12-21 22:24:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowingTransformation.st,v 1.27 2015-01-22 14:23:53 cg Exp $'
 ! !