oops
authorClaus Gittinger <cg@exept.de>
Tue, 27 Feb 1996 17:41:35 +0100
changeset 421 8c83ea70a673
parent 420 e57314f0ceb7
child 422 12bfba6f62b5
oops
Workspace.st
--- a/Workspace.st	Tue Feb 27 17:29:16 1996 +0100
+++ b/Workspace.st	Tue Feb 27 17:41:35 1996 +0100
@@ -91,7 +91,7 @@
     |scr topView workspace f|
 
     topView := StandardSystemView 
-                label:(ClassResources string:'Workspace') 
+                label:(self classResources string:'Workspace') 
                 minExtent:(100 @ 100).
 
     scr := HVScrollableView for:self in:topView.
@@ -109,7 +109,7 @@
      Workspace open
     "
 
-    "Modified: 27.2.1996 / 15:12:47 / cg"
+    "Modified: 27.2.1996 / 17:41:08 / cg"
 ! !
 
 !Workspace methodsFor:'accessing'!
@@ -542,4 +542,4 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.38 1996-02-27 14:31:51 cg Exp $'! !
+^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.39 1996-02-27 16:41:35 cg Exp $'! !