WABatchSelection


Seaside-Components-Dialogs

Comment:



Hierarchy:

ProtoObject
Object
WAPresenter
WAComponent
WABatchSelection

Summary:

instance variables:

batcher linkSelector textSelector

methods:

instance class
as yet unclassified as yet unclassified

Detail:

instance variables:

batcher
linkSelector
textSelector

instance methods:

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

class methods:

as yet unclassified
items: aCollection link: linkSelector text: textSelector

	^ self new
		items: aCollection;
		linkSelector: linkSelector;
		textSelector: textSelector

^top


- made by Dandelion -