8 lines
152 B
Smalltalk
8 lines
152 B
Smalltalk
rendering
|
|
renderGlobalButtonsOn: html
|
|
html tbsButtonGroup: [
|
|
html tbsButton
|
|
beSuccess;
|
|
callback: [ self addContact ];
|
|
with: 'New contact'
|
|
] |