--- a/AppModel.st	Thu Feb 18 13:58:09 1999 +0100
+++ b/AppModel.st	Thu Feb 18 18:27:32 1999 +0100
@@ -1612,7 +1612,11 @@
     "open the window - assumes that the builder has already setup
      the interface."
 
-    builder openDialog.
+"/    builder openDialog.
+    builder
+        openAt:nil 
+        withExtent:nil 
+        andType:#dialog
 
     "Created: 14.2.1997 / 20:20:39 / cg"
 !
@@ -1817,7 +1821,10 @@
 
     |sav|
 
-    masterApplication notNil ifTrue:[
+    "/ In multiView apps, tell my master.
+    "/ (but not if I am a modal reincarnation)
+    (masterApplication notNil 
+    and:[self window isModal not]) ifTrue:[
 
         "/ temporary clear my masterApplication to prevent
         "/ endless recursion, in case the master sends me
@@ -1854,7 +1861,10 @@
 
     |sav|
 
-    masterApplication notNil ifTrue:[
+    "/ In multiView apps, tell my master.
+    "/ (but not if I am a modal reincarnation)
+    (masterApplication notNil 
+    and:[self window isModal not]) ifTrue:[
 
         "/ temporary clear my masterApplication to prevent
         "/ endless recursion, in case the master sends me
@@ -1964,6 +1974,6 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/AppModel.st,v 1.99 1999-02-11 11:19:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/AppModel.st,v 1.100 1999-02-18 17:27:32 cg Exp $'
 ! !
 ApplicationModel initialize!