--- a/Workspace.st	Tue Apr 08 09:25:53 2003 +0200
+++ b/Workspace.st	Tue Apr 08 10:20:47 2003 +0200
@@ -339,6 +339,10 @@
     "Modified: 27.2.1996 / 15:31:37 / cg"
 !
 
+selectAll
+    super selectAll
+!
+
 simulatedSelf:anObject
     "define what self is in an evaluation"
 
@@ -1165,5 +1169,5 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.126 2003-04-08 07:25:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.127 2003-04-08 08:20:47 cg Exp $'
 ! !