--- a/ComboView.st Thu Jul 24 14:44:31 2008 +0200
+++ b/ComboView.st Thu Jul 24 16:29:21 2008 +0200
@@ -554,8 +554,10 @@
"/ although eaten, we still must care for the focus !!
self wantsFocusWithButtonPress ifTrue:[
- self windowGroup focusView:self.
-Transcript showCR:self windowGroup focusCameByTab.
+ self windowGroup notNil ifTrue:[
+ self windowGroup focusView:self.
+"/ Transcript showCR:self windowGroup focusCameByTab.
+ ]
].
^ true
@@ -850,5 +852,5 @@
!ComboView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/ComboView.st,v 1.94 2008-07-22 20:50:14 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/ComboView.st,v 1.95 2008-07-24 14:29:21 mb Exp $'
! !