ProtoObjectObjectWAPresenterWAComponentWABatchSelection
| batcher | linkSelector | textSelector |
| instance | class |
|---|---|
| as yet unclassified | as yet unclassified |
| batcher |
|---|
| linkSelector |
|---|
| textSelector |
|---|
| as yet unclassified |
|---|
| children |
^ Array with: batcher |
| choose: anItem |
self answer: anItem |
| items: aCollection |
batcher _ WABatchedList new items: aCollection; batchSize: 8 |
| linkSelector: aSymbol |
linkSelector _ aSymbol |
| renderContentOn: html |
html list: batcher batch do: [:ea | html anchorWithAction: [self choose: ea] text: (ea perform: linkSelector). html break; text: (ea perform: textSelector). html paragraph]. html attributes alignCenter. html div: batcher. |
| textSelector: aSymbol |
textSelector _ aSymbol |
| as yet unclassified |
|---|
| items: aCollection link: linkSelector text: textSelector |
^ self new items: aCollection; linkSelector: linkSelector; textSelector: textSelector |