comment/format in: #mapped
authorClaus Gittinger <cg@exept.de>
Thu, 09 Dec 2010 12:36:48 +0100
changeset 5664 4546b913860e
parent 5663 e72ce3f3ae68
child 5665 f901e164a7ba
comment/format in: #mapped changed: #requestFocus
SimpleView.st
--- a/SimpleView.st	Thu Dec 09 10:49:44 2010 +0100
+++ b/SimpleView.st	Thu Dec 09 12:36:48 2010 +0100
@@ -6008,14 +6008,13 @@
         self isTopView ifFalse:[
             self isKeyboardConsumer ifTrue:[
                 self takeFocusWhenMapped ifTrue:[
-                    "/ Transcript show:'take: '; showCR:self.
                     self requestFocus
                 ]
             ].
         ].
     ]
 
-    "Modified: / 09-12-2010 / 10:49:28 / cg"
+    "Modified: / 09-12-2010 / 10:53:30 / cg"
 !
 
 mouseWheelMotion:buttonState x:x y:y amount:amount deltaTime:dTime
@@ -6602,10 +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.
     windowGroup notNil ifTrue:[
-	^ windowGroup focusRequestFrom:self
-    ].
+        ^ windowGroup focusRequestFrom:self
+    ].
+Transcript show:'oops: '; showCR:self.
     ^ true
+
+    "Modified: / 09-12-2010 / 10:53:20 / cg"
 !
 
 requestFocusOnPointerEnter
@@ -10727,11 +10730,11 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.677 2010-12-09 09:49:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.678 2010-12-09 11:36:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.677 2010-12-09 09:49:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.678 2010-12-09 11:36:48 cg Exp $'
 ! !
 
 SimpleView initialize!