--- a/WindowBuilder.st	Sat Mar 17 12:38:33 2007 +0100
+++ b/WindowBuilder.st	Tue Mar 27 11:17:30 2007 +0200
@@ -1006,8 +1006,8 @@
 
     menu isBlock ifFalse:[
         ((menu := menu value) notNil and:[application notNil]) ifTrue:[
-            menu isArray ifTrue:[
-                menu := Menu new fromLiteralArrayEncoding:menu.
+            menu isCollection ifTrue:[
+                menu := Menu decodeFromLiteralArray:menu.
                 "/ menu receiver:application. -- now done in findGuiResources ...
             ].
             menu findGuiResourcesIn:application
@@ -1015,7 +1015,7 @@
     ].
     ^ menu
 
-    "Modified: / 18.6.1998 / 16:30:31 / cg"
+    "Modified: / 27-03-2007 / 11:17:22 / cg"
 !
 
 specificationFor:aKey
@@ -1363,5 +1363,5 @@
 !WindowBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.123 2007-03-02 15:00:05 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowBuilder.st,v 1.124 2007-03-27 09:17:30 cg Exp $'
 ! !