--- a/MenuEditor.st	Tue Jan 28 21:59:00 2014 +0100
+++ b/MenuEditor.st	Tue Jan 28 21:59:08 2014 +0100
@@ -2843,8 +2843,9 @@
       nextPutChunkSeparator;
       cr.
 
-    (ReadStream on:s contents) fileIn.
-
+    Class packageQuerySignal answer:cls package do:[
+        (ReadStream on:s contents) fileIn.
+    ].
     self isStandAlone ifTrue:[
         self helpTool doSave
     ].
@@ -2853,7 +2854,7 @@
     hasSaved := true.
     self clearModified.
 
-    "Modified: / 24-08-2011 / 12:26:08 / cg"
+    "Modified: / 28-01-2014 / 21:57:24 / cg"
 !
 
 doSaveAs