--- a/SimpleView.st	Thu Dec 09 12:36:48 2010 +0100
+++ b/SimpleView.st	Thu Dec 09 14:34:01 2010 +0100
@@ -6601,14 +6601,14 @@
      (it will be ignored, if an explicit focus-change is currently
       active - i.e. if the user tabbed into a widget)"
 
-Transcript show:'take: '; showCR:self.
+"/ Transcript show:'take: '; showCR:self.
     windowGroup notNil ifTrue:[
         ^ windowGroup focusRequestFrom:self
     ].
-Transcript show:'oops: '; showCR:self.
+"/ Transcript show:'oops: '; showCR:self.
     ^ true
 
-    "Modified: / 09-12-2010 / 10:53:20 / cg"
+    "Modified: / 09-12-2010 / 14:33:40 / cg"
 !
 
 requestFocusOnPointerEnter
@@ -10730,11 +10730,11 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.678 2010-12-09 11:36:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.679 2010-12-09 13:34:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.678 2010-12-09 11:36:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.679 2010-12-09 13:34:01 cg Exp $'
 ! !
 
 SimpleView initialize!