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

16 lines
401 B
Smalltalk

instance creation
createDefault
^ self new
addContact: (Contact
newNamed: 'Damien Cassou'
email: 'damien@cassou.me');
addContact: (Contact
newNamed: 'Marcus Denker'
email: 'marcus.denker@inria.fr');
addContact: (Contact
newNamed: 'Tudor Girba'
email: 'tudor@tudorgirba.com');
addContact: (Contact
newNamed: 'Clara Allende'
email: 'clari.allende@gmail.com');
yourself