Comment #1 on issue 994 by tu...@tudorgirba.com: Navigating in Moose Finder is slow http://code.google.com/p/moose-technology/issues/detail?id=994
The issue comes from
MooseGroupStorage>>"protocol: private" becomeKind: elementStorageClass [elementStorageClass includesBehavior: MooseGroupStorage] assert. self do: [ :each | each hasUniqueMooseNameInModel ifTrue: [ each privateClearMooseName ] ]. self class = elementStorageClass ifFalse: [self become: (elementStorageClass withAll: self)]