--- a/MenuPanel.st	Fri Oct 14 06:49:43 2016 +0200
+++ b/MenuPanel.st	Sat Oct 15 06:56:49 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1997 by eXept Software AG
 	      All Rights Reserved
@@ -2941,10 +2939,13 @@
         oldPref := preferredExtent.
         preferredExtent := nil.
         mustRearrange := true.
-        self invalidate. "/ RepairNow:true
-        (oldPref notNil and:[oldPref ~= self preferredExtent]) ifTrue:[
-            dependents notNil ifTrue:[ self changed:#preferredExtent ]
-        ].
+        "/ if I am not yet created/was never created, do nothing
+        device notNil ifTrue:[
+            self invalidate. "/ RepairNow:true
+            (oldPref notNil and:[oldPref ~= self preferredExtent]) ifTrue:[
+                dependents notNil ifTrue:[ self changed:#preferredExtent ]
+            ].
+        ]
     ]
 
     "Modified: / 6.6.1998 / 19:51:07 / cg"