--- a/WindowGroup.st	Thu May 14 15:02:47 2009 +0200
+++ b/WindowGroup.st	Thu May 14 20:53:32 2009 +0200
@@ -308,7 +308,8 @@
     " caching the last value ..."
     activeProcess == LastActiveProcess ifTrue:[
         (LastActiveGroup notNil 
-        and:[LastActiveGroup process == LastActiveProcess]) ifTrue:[
+        and:[LastActiveGroup process == LastActiveProcess
+        and:[LastActiveGroup views notEmptyOrNil ]]) ifTrue:[
             ^ LastActiveGroup
         ]
     ].
@@ -2707,7 +2708,7 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.294 2009-02-26 21:33:40 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.295 2009-05-14 18:53:32 cg Exp $'
 ! !
 
 WindowGroup initialize!