--- a/Menu.st Wed Aug 22 22:05:32 2012 +0200
+++ b/Menu.st Sun Sep 09 15:10:32 2012 +0200
@@ -204,13 +204,15 @@
item := MenuItem new.
item label:(labelArray at:idx).
- item value:(selections at:idx).
+ item itemValue:(selections at:idx).
self addItem:item.
(lines includes:idx) ifTrue:[
self addSeparator.
].
].
+
+ "Modified: / 09-09-2012 / 13:08:55 / cg"
! !
!Menu methodsFor:'accessing'!
@@ -621,8 +623,10 @@
!
addItem:aMenuItem value:aValue
- aMenuItem value:aValue.
+ aMenuItem itemValue:aValue.
self addItem:aMenuItem.
+
+ "Modified: / 09-09-2012 / 13:08:50 / cg"
!
addItemGroup:aGroup
@@ -1250,5 +1254,5 @@
!Menu class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.83 2011-10-12 21:03:59 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.84 2012-09-09 13:10:32 cg Exp $'
! !