ProtoObjectObjectWAPresenterWAComponentWAFormDialogWANoteDialog
| note |
| instance | class |
|---|---|
| as yet unclassified | no messages
|
| note |
|---|
| as yet unclassified |
|---|
| buttons |
^ #(ok cancel) |
| cancel |
self answer: nil |
| ok |
self answer: note |
| renderDialogOn: html |
html cssId: 'dialog-note'. html textAreaWithValue: note callback: [:v | note _ v]. |
| style |
^ '
#dialog-note {width: 80%; height: 200px}
'
|