diff --git a/Apps/Holonica/HlPerson.class.st b/Apps/Holonica/HlPerson.class.st index c70e2d3..716a2db 100644 --- a/Apps/Holonica/HlPerson.class.st +++ b/Apps/Holonica/HlPerson.class.st @@ -4,7 +4,7 @@ Class { #instVars : [ 'givenName', 'familyName', - 'metadata' + 'email' ], #category : #Holonica } @@ -35,6 +35,18 @@ HlPerson class >> fromListName: aString [ givenName: names contents trimmed ] +{ #category : #accessing } +HlPerson >> email [ + + ^ email +] + +{ #category : #accessing } +HlPerson >> email: anObject [ + + email := anObject +] + { #category : #accessing } HlPerson >> familyName [ @@ -58,15 +70,3 @@ HlPerson >> givenName: anObject [ givenName := anObject ] - -{ #category : #accessing } -HlPerson >> metadata [ - - ^ metadata -] - -{ #category : #accessing } -HlPerson >> metadata: anObject [ - - metadata := anObject -]