Status: New
Owner: ----
CC: vhane...(a)gmail.com
Labels: Type-Defect Priority-Medium Component-Spy
New issue 503 by alexandr...(a)gmail.com: Abstract classes and Hapao
http://code.google.com/p/moose-technology/issues/detail?id=503
Gaëtan le Brun suggested to remove abstract classes before running the test
in Hapao.
This makes sense
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