--- 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 $'
! !