Dear Lukas,
I found this little walkback when setting beExtensible.
oh and btw, SUTabbedPanel breaks if you dont add any elements
best regards
Keith
===========
Subject: [BUG]WASelectTag(Object)>>doesNotUnderstand:
#otherLabel:otherCallback:promptString:
WASelectTag(Object)>>doesNotUnderstand:
#otherLabel:otherCallback:promptString:
Receiver: a WASelectTag
Arguments and temporary variables:
aMessage: otherLabel: '(other)' otherCallback: [] in
MASelectListComponent>>ren...etc...
Receiver's instance variables:
canvas: a WARenderCanvas
parent: nil
closed: false
attributes: a WAHtmlAttributes
list: an OrderedCollection(nil 'click-page' 'shelf'
'shelf-template' 'side-bar'...etc...
selected: nil
callbackBlock: [] in MASelectListComponent>>renderEditorOn:
{[:value | self val...etc...
labelBlock: [] in MASelectListComponent>>renderEditorOn:
{[:value | self labelF...etc...
enabledBlock: nil
isOptional: false
optionalLabel: nil
[] in MASelectListComponent>>renderEditorOn: {[:tag | self description
isExtensible ifTrue: [tag otherLabel: '(other...]}
Arguments and temporary variables:
html: a WARenderCanvas
value: nil
tag: a WASelectTag
WASelectTag(Object)>>in:
Receiver: a WASelectTag
Arguments and temporary variables:
aBlock: [] in MASelectListComponent>>renderEditorOn: {[:tag
| self description ...etc...
Receiver's instance variables:
canvas: a WARenderCanvas
parent: nil
closed: false
attributes: a WAHtmlAttributes
list: an OrderedCollection(nil 'click-page' 'shelf'
'shelf-template' 'side-bar'...etc...
selected: nil
callbackBlock: [] in MASelectListComponent>>renderEditorOn:
{[:value | self val...etc...
labelBlock: [] in MASelectListComponent>>renderEditorOn:
{[:value | self labelF...etc...
enabledBlock: nil
isOptional: false
optionalLabel: nil
MASelectListComponent>>renderEditorOn:
Receiver: a MASelectListComponent
Arguments and temporary variables:
html: a WARenderCanvas
value: nil
tag: a WASelectTag
Receiver's instance variables:
smParent: nil
decoration: a WAValueHolder contents: a MASelectListComponent
memento: a MACheckedMemento model: a PRSettingsCommand(a
PRComponent name: 'Tabbed Pages Test'...etc...
description: a MASingleOptionDescription label: 'Tag'
comment: 'Show items with...etc...
parent: a MAContainerComponent
--- The full stack ---
WASelectTag(Object)>>doesNotUnderstand:
#otherLabel:otherCallback:promptString:
[] in MASelectListComponent>>renderEditorOn: {[:tag | self description
isExtensible ifTrue: [tag otherLabel: '(other...]}
WASelectTag(Object)>>in:
MASelectListComponent>>renderEditorOn:
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
MASelectListComponent(MAElementComponent)>>renderContentOn:
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:
[] in WATableDataTag(WATagBrush)>>with: {[self before. anObject
renderOn: canvas. self after]}
BlockContext>>renderOn:
WARenderCanvas(WACanvas)>>nest:
WATableDataTag(WABrush)>>with:
WATableDataTag(WATagBrush)>>with:
MATableRenderer>>renderControl:
MATableRenderer(MAComponentRenderer)>>renderElement:
[] in MATableRenderer>>renderElement: {[super renderElement: aDescription]}
BlockContext>>renderOn:
[] in WAGenericTag(WATagBrush)>>with: {[self before. anObject renderOn:
canvas. self after]}
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:
MATableRenderer(MAVisitor)>>visitSingleOptionDescription:
MASingleOptionDescription>>acceptMagritte:
MATableRenderer(MAVisitor)>>visit:
[] in MATableRenderer(MAVisitor)>>visitAll: {[:each | self visit: each]}
...etc...