# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1407159776 -7200
# Node ID 55e191acf1b0f81d6e12adc256aff1336f4c0e09
# Parent  49cb7d13746cfad78781cdac5758cd1c60011b9b
class: ApplicationModel
added: #forgetDefaultExtentFor:

diff -r 49cb7d13746c -r 55e191acf1b0 ApplicationModel.st
--- a/ApplicationModel.st	Sun Aug 03 14:36:49 2014 +0200
+++ b/ApplicationModel.st	Mon Aug 04 15:42:56 2014 +0200
@@ -677,6 +677,16 @@
 
 !ApplicationModel class methodsFor:'history'!
 
+forgetDefaultExtentFor:anApplicationClass
+    "forget the remembered last extent for some application class.
+     This is sent by the UIPainter, when a windowspec is saved,
+     to bring up the application with its possibly changed default extent"
+
+    DefaultExtents notNil ifTrue:[
+        DefaultExtents removeKey:anApplicationClass name ifAbsent:[]
+    ]
+!
+
 forgetRecentlyOpenedApplications
     RecentlyOpenedApplications := nil
 !
@@ -4124,11 +4134,11 @@
 !ApplicationModel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.358 2014-08-03 12:36:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.359 2014-08-04 13:42:56 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.358 2014-08-03 12:36:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.359 2014-08-04 13:42:56 cg Exp $'
 ! !