[Pharo-dev] MenuRegistration is probably missing a MenuGroupSpec object

March 5, 2014


      When I see this code, I think that we are missing a MenuGroupSpec to work with MenuSpec
and we could also rename PluggableMenuSpec into MenuSpec.


buildMenuSpec: aMenu 
	"recursiveley build the menu spec aMenu passed as argument"
	self itemList
		ifNotNil: [:l | 
			| m |
			m := isGroup 
				ifFalse: [PluggableMenuSpec withModel: nil]
				ifTrue: [aMenu].
			(l reject: [:i | i precondition value not]) do: [:i | i buildMenuSpec: m].
			isGroup ifFalse: [self spec subMenu: m]].
	isGroup
		ifTrue: [self spec separator ifTrue: [self itemList ifNotNil: [self itemList last spec separator: true]]] 
		ifFalse: [aMenu items add: self spec]


https://pharo.fogbugz.com/default.asp?13044

[Pharo-dev] MenuRegistration is probably missing a MenuGroupSpec object

Pharo4Stef