7 lines
142 B
Smalltalk
7 lines
142 B
Smalltalk
rendering
|
|
renderSubmitButtonOn: html
|
|
html tbsSubmitButton
|
|
beSuccess;
|
|
bePrimary;
|
|
callback: [ self answer: self contact ];
|
|
with: 'Save' |