--- a/Workspace.st	Tue May 18 13:17:13 2004 +0200
+++ b/Workspace.st	Tue May 18 13:18:03 2004 +0200
@@ -1127,7 +1127,7 @@
 
     ^ self 
         do:(self selection) 
-        withValueDo:[:result | shifted ifTrue:[result inspect] ifFalse:[result basicInspect] ]
+        withValueDo:[:result | shifted ifTrue:[result basicInspect] ifFalse:[result inspect] ]
 
     "Modified: / 16.5.1998 / 16:44:56 / cg"
 !
@@ -1185,5 +1185,5 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.141 2004-05-18 11:17:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.142 2004-05-18 11:18:03 cg Exp $'
 ! !