MenuPanel.st
branchjv
changeset 5097 5fbbb3dbef78
parent 5025 22261417679a
parent 5094 5f32a7d62c65
child 5130 436b5fa0e195
--- a/MenuPanel.st	Tue May 10 06:50:22 2016 +0200
+++ b/MenuPanel.st	Wed May 11 07:02:19 2016 +0200
@@ -342,13 +342,6 @@
     "
 
     "Modified: / 15.1.1998 / 23:08:31 / stefan"
-!
-
-preSnapshot
-    "remove all resources"
-
-    Images := nil.
-    LigthenedImages := nil.
 ! !
 
 !MenuPanel class methodsFor:'default icons'!
@@ -911,6 +904,16 @@
     "Modified: / 8.8.1998 / 02:13:11 / cg"
 ! !
 
+!MenuPanel class methodsFor:'startup & release'!
+
+preSnapshot
+    "flush cached resources before saving a snapshot
+     (do not save them in the image)"
+
+    Images := nil.
+    LigthenedImages := nil.
+! !
+
 !MenuPanel class methodsFor:'utilities'!
 
 processAmpersandCharactersFor:aLabel withAccessCharacterPosition:accessCharacterPositionOrNil