--- a/ApplicationModel.st	Thu Jul 07 18:43:20 2011 +0200
+++ b/ApplicationModel.st	Tue Jul 12 00:08:15 2011 +0200
@@ -2787,11 +2787,11 @@
 
     builder "openWindow."
         openAt:nil
-        withExtent:nil
+        withExtent:(self defaultWindowExtent)
         andType:(self defaultWindowType)
 
     "Created: / 14-02-1997 / 20:20:39 / cg"
-    "Modified: / 07-07-2011 / 18:40:34 / cg"
+    "Modified: / 11-07-2011 / 22:30:27 / cg"
 !
 
 openWindowAs:windowType
@@ -2800,10 +2800,10 @@
 
     builder 
         openAt:nil 
-        withExtent:nil 
+        withExtent:(self defaultWindowExtent) 
         andType:windowType
 
-    "Modified (format): / 07-07-2011 / 18:40:54 / cg"
+    "Modified: / 11-07-2011 / 22:30:35 / cg"
 !
 
 openWindowAt:aPoint
@@ -2812,7 +2812,7 @@
 
     builder "openWindowAt:aLocation."
         openAt:aPoint
-        withExtent:nil
+        withExtent:(self defaultWindowExtent)
         andType:(self defaultWindowType)
 
     "Created: / 14-02-1997 / 20:20:55 / cg"
@@ -2834,7 +2834,7 @@
 "/    builder openDialog.
     builder
         openAt:nil 
-        withExtent:nil 
+        withExtent:(self defaultWindowExtent) 
         andType:#dialog
 
     "Created: / 14-02-1997 / 20:20:39 / cg"
@@ -3126,6 +3126,12 @@
 
 !ApplicationModel methodsFor:'queries'!
 
+defaultWindowExtent
+    ^ nil
+
+    "Created: / 11-07-2011 / 22:30:12 / cg"
+!
+
 defaultWindowSpecName
     ^ #windowSpec
 !
@@ -3841,7 +3847,7 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.316 2011-07-07 16:42:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.317 2011-07-11 22:08:15 cg Exp $'
 ! !
 
 ApplicationModel initialize!