--- a/UIBuilder.st	Thu Jul 17 12:07:02 1997 +0200
+++ b/UIBuilder.st	Thu Jul 17 12:09:13 1997 +0200
@@ -217,6 +217,11 @@
         menu := menu value.
 
         (application notNil and:[menu notNil]) ifTrue:[
+            menu isArray ifTrue:[
+                menu := Menu new fromLiteralArrayEncoding:menu.
+                menu receiver:application.
+              ^ menu
+            ].
             menu findGuiResourcesIn:application
         ]
     ].
@@ -300,6 +305,6 @@
 !UIBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.26 1997-06-17 16:08:53 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.27 1997-07-17 10:09:13 ca Exp $'
 ! !
 UIBuilder initialize!