--- a/UIPainter.st	Fri Aug 01 16:51:34 2014 +0200
+++ b/UIPainter.st	Mon Aug 04 15:44:39 2014 +0200
@@ -6001,6 +6001,7 @@
         self warn:('Oops - cannot save. Class not found: ' , specClassName).
         ^ nil
     ].
+    ApplicationModel forgetDefaultExtentFor:specClass.
 
     painter := self painter.
     painter