revert focus to previous group
(not maingroup) when closing a modalGroup.
(for stacked modals, to avoid main-group raise
under windows, when closing a modal in a modal view)
--- a/WindowGroup.st Thu Apr 01 10:38:44 2004 +0200
+++ b/WindowGroup.st Thu Apr 01 12:32:21 2004 +0200
@@ -1034,8 +1034,8 @@
"
return input focus to previously active groups top.
"
- tops := mainGroup topViews.
- (tops notNil and:[tops notEmpty]) ifTrue:[
+ tops := prevGroup topViews.
+ tops notEmptyOrNil ifTrue:[
tops first getKeyboardFocus.
].
].
@@ -2731,7 +2731,7 @@
!WindowGroup class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.258 2004-02-26 11:24:53 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.259 2004-04-01 10:32:21 ca Exp $'
! !
WindowGroup initialize!