class: Workspace
authorClaus Gittinger <cg@exept.de>
Thu, 24 Oct 2013 10:12:09 +0200
changeset 4815 f75345885ad7
parent 4814 6f9c85f3fbfb
child 4816 6020db6f57f6
class: Workspace added: #nameSpaceForDoits
Workspace.st
--- a/Workspace.st	Fri Oct 18 23:29:53 2013 +0200
+++ b/Workspace.st	Thu Oct 24 10:12:09 2013 +0200
@@ -606,6 +606,13 @@
     ^ selectionFgColor
 !
 
+nameSpaceForDoits
+    "can be used by the embedding application to control doIt execution
+     (especially: for tools like expecco, to provide better workspaces"
+
+    ^ namespaceForDoits ? Smalltalk
+!
+
 nameSpaceForDoits:aNameSpaceOrNil
     "can be used by the embedding application to control doIt execution
      (especially: for tools like expecco, to provide better workspaces"
@@ -2189,10 +2196,10 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.309 2013-09-26 17:34:48 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.310 2013-10-24 08:12:09 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.309 2013-09-26 17:34:48 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.310 2013-10-24 08:12:09 cg Exp $'
 ! !