[Moose-dev] Issue 794 in moose-technology: More robust dynamicActions in MooseFinder

Status: Accepted Owner: ---- Labels: Type-Defect Priority-Medium New issue 794 by usman.bh...(a)gmail.com: More robust dynamicActions in MooseFinder http://code.google.com/p/moose-technology/issues/detail?id=794 Doru When we clicked (to bring the menu) in Moose Finder we got list entity mooseInterestingEntity = to nil. So for now we patched the method to [ :list | list entity mooseInterestingEntity ifNotNil: [:entity| entity mooseFinderActions ]]. buildBrowser browser := GLMFinder new. browser title: [:each | 'Moose Finder on ', each mooseInterestingEntity mooseDisplayString]. browser show: [ :a | a title: [ :each | (each mooseInterestingEntity mooseDisplayString contractTo: 30), ' (', each mooseInterestingEntity class name, ')' ]; dynamicActions: [ :list | list entity mooseInterestingEntity ifNotNil: [:entity| entity mooseFinderActions ]]. a dynamic display: [:each | | dynamic | dynamic := GLMCompositePresentation new. each mooseInterestingEntity mooseFinderPresentationsIn: dynamic. dynamic ]. a updateOn: MooseEntityAdded from: [:each | each isNil ifFalse: [each announcer] ifTrue: [nil] ]. a updateOn: MooseEntityRemoved from: [:each | each isNil ifFalse: [each announcer] ifTrue: [nil] ]. a updateOn: MooseEntityRenamed from: [:each | each isNil ifFalse: [each announcer] ifTrue: [nil] ]]. ^ browser