--- a/DisplayRootView.st	Wed Oct 25 14:57:18 2000 +0200
+++ b/DisplayRootView.st	Wed Oct 25 15:02:28 2000 +0200
@@ -103,14 +103,17 @@
      the one and only rootView."
 
     aDisplay == Display ifTrue:[
-        RootView notNil ifTrue:[^ RootView].
+        RootView notNil ifTrue:[
+            RootView device == aDisplay ifTrue:[
+                ^ RootView
+            ]
+        ].
         RootView := super onDevice:aDisplay.
         ^ RootView
     ].
     ^ super onDevice:aDisplay
 
-    "Created: 18.1.1997 / 18:23:22 / cg"
-! !
+    "Created: 18.1.1997 / 18:23:22 / cg"! !
 
 !DisplayRootView methodsFor:'accessing'!
 
@@ -242,6 +245,6 @@
 !DisplayRootView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DisplayRootView.st,v 1.24 2000-08-09 19:12:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DisplayRootView.st,v 1.25 2000-10-25 13:02:28 martin Exp $'
 ! !
 DisplayRootView initialize!