Status: Accepted
Owner: ----
Labels: Type-Defect Priority-Medium
New issue 794 by
[hidden email]: More robust dynamicActions in
MooseFinder
http://code.google.com/p/moose-technology/issues/detail?id=794Doru
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
_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.iam.unibe.ch/mailman/listinfo/moose-dev