Re: MASingleOptionDescription or MAOneToManyDescription?

Ok, thanks for helping. I've tried that and here is what I have: descriptionOrg ^ (MASingleOptionDescription new) selectorAccessor: #org; label: 'Organization'; options: ALStorage orgs; priority: 20; yourself ALStorage>>orgs returns an OrderedCollection. The error I get is:

ALOrganization(Object)>>doesNotUnderstand: #do: Receiver: an ALOrganization Arguments and temporary variables: aMessage: do: [] in WriteStream(Stream)>>nextPutAll: {[:v | self nextPut: v]} Receiver's instance variables: fullName: 'AbleLink Technologies, Inc.' address: nil caregivers: nil clients: nil licenses: nil shortName: 'AbleLink' contactManager: an ALServiceContactManager forums: nil uuid: nil staff: an OrderedCollection(an ALStaffMember) customers: nil WriteStream(Stream)>>nextPutAll: Receiver: a WriteStream '' Arguments and temporary variables: aCollection: an ALOrganization v: nil Receiver's instance variables: collection: '' position: 0 readLimit: 0 writeLimit: 0 WriteStream>>nextPutAll: Receiver: a WriteStream '' Arguments and temporary variables: aCollection: an ALOrganization newEnd: nil Receiver's instance variables: collection: '' position: 0 readLimit: 0 writeLimit: 0 MAStringWriter>>visitStringDescription: Receiver: a MAStringWriter Arguments and temporary variables: aDescription: a MAStringDescription label: '' comment: nil Receiver's instance variables: stream: a WriteStream '' object: an ALOrganization --- The full stack --- ALOrganization(Object)>>doesNotUnderstand: #do: WriteStream(Stream)>>nextPutAll: WriteStream>>nextPutAll: MAStringWriter>>visitStringDescription: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - MAStringDescription>>acceptMagritte: MAStringWriter(MAVisitor)>>visit: MAStringWriter(MAWriter)>>write:description:to: MAStringWriter>>write:description:to: MAStringWriter(MAWriter)>>write:description: MAStringWriter class(MAWriter class)>>write:description: MAStringDescription(MADescription)>>toString:writer: MAStringDescription(MADescription)>>toString: MASingleOptionDescription(MAOptionDescription)>>labelForOption: MASelectListComponent(MAOptionComponent)>>labelForOption: [] in MASelectListComponent>>renderEditorOn: {[:value | self labelForOption: value]} WASelectTag(WACollectionTag)>>labelForOption: [] in WASelectTag>>optionsOn: {[:each | brush := html option. (self isDisabled: each) ifTrue: [brush di...]} OrderedCollection>>do: WASelectTag>>optionsOn: [] in WASelectTag>>with: {[self optionsOn: canvas. aBlock value. self hasOther ifTrue: [canvas opt...]} BlockContext>>renderOn: WASelectTag(WATagBrush)>>within: [] in WASelectTag(WATagBrush)>>with: {[self within: aBlock]} BlockContext>>renderOn: WARenderCanvas(WACanvas)>>nest: WASelectTag(WABrush)>>with: WASelectTag(WATagBrush)>>with: WASelectTag>>with: WASelectTag(WABrush)>>close WARenderCanvas(WACanvas)>>flush WARenderCanvas>>close MASelectListComponent(WAPresenter)>>renderWithContext: [] in MASelectListComponent(WAComponent)>>renderOn: {[:each | each renderWithContext: aRenderer context]} MASelectListComponent(WAComponent)>>decorationChainDo: MASelectListComponent(WAComponent)>>renderOn: WARenderCanvas(WACanvas)>>render: MATableRenderer(MAComponentRenderer)>>renderControl: [] in MATableRenderer>>renderControl: {[super renderControl: aDescription]} BlockContext>>renderOn: WATableDataTag(WATagBrush)>>within: [] in WATableDataTag(WATagBrush)>>with: {[self within: aBlock]} BlockContext>>renderOn: WARenderCanvas(WACanvas)>>nest: WATableDataTag(WABrush)>>with: WATableDataTag(WATagBrush)>>with: MATableRenderer>>renderControl: MATableRenderer(MAComponentRenderer)>>renderElement: [] in MATableRenderer>>renderElement: {[super renderElement: aDescription]} BlockContext>>renderOn: WAGenericTag(WATagBrush)>>within: [] in WAGenericTag(WATagBrush)>>with: {[self within: aBlock]} BlockContext>>renderOn: WARenderCanvas(WACanvas)>>nest: WAGenericTag(WABrush)>>with: WAGenericTag(WATagBrush)>>with: WARenderCanvas(WAHtmlCanvas)>>tableRow: MATableRenderer>>renderElement: MATableRenderer(MAComponentRenderer)>>visitElementDescription: MATableRenderer(MAVisitor)>>visitReferenceDescription: MATableRenderer(MAVisitor)>>visitOptionDescription: ...etc... _______________________________________________ SmallWiki, Magritte, Pier and Related Tools ... https://www.iam.unibe.ch/mailman/listinfo/smallwiki