--- a/WindowGroup.st	Fri Mar 02 18:11:43 2007 +0100
+++ b/WindowGroup.st	Fri Mar 02 18:12:41 2007 +0100
@@ -2198,6 +2198,12 @@
     "Modified: / 08-11-2006 / 12:17:55 / cg"
 !
 
+focusViewUnmapped
+    "the view which currently had the focus was unmapped"
+
+    self focusView:nil
+!
+
 pointerView
     "return the view which currently has the pointer"
 
@@ -2681,7 +2687,7 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.285 2007-03-02 15:01:47 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.286 2007-03-02 17:12:41 ca Exp $'
 ! !
 
 WindowGroup initialize!