--- a/Workspace.st	Fri Jul 27 10:14:16 2012 +0200
+++ b/Workspace.st	Fri Jul 27 11:05:29 2012 +0200
@@ -1418,7 +1418,7 @@
     "JV@2012-03-19: Changed to reflect value of autoDefineVariables"
     [
         result := (self compilerClass ? Compiler) new 
-                currentNamespace:namespaceForDoits;
+                currentNameSpace:namespaceForDoits;
                 moreSharedPools:poolsConsideredInDoIts;
                 evaluate:theCode 
                 in:nil 
@@ -1444,7 +1444,7 @@
     ^result
 
     "Modified: / 19-03-2012 / 10:01:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 19-07-2012 / 17:05:11 / cg"
+    "Modified: / 27-07-2012 / 09:33:39 / cg"
 !
 
 initStyle
@@ -2031,9 +2031,9 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.251 2012-07-26 21:25:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.252 2012-07-27 09:05:29 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.251 2012-07-26 21:25:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.252 2012-07-27 09:05:29 cg Exp $'
 ! !