Files
contact-book/ContactBook.package/WAContactBook.class/instance/renderEditButtonForContact.on..st
2018-05-12 15:25:36 +02:00

6 lines
160 B
Smalltalk

updating
renderEditButtonForContact: aContact on: html
html tbsButton
beSuccess;
callback: [ self call: (WAContact editContact: aContact) ];
with: 'Edit'