Renaming.
This commit is contained in:
parent
b90c33bf04
commit
14d46728b1
@ -4,7 +4,7 @@ Class {
|
|||||||
#instVars : [
|
#instVars : [
|
||||||
'givenName',
|
'givenName',
|
||||||
'familyName',
|
'familyName',
|
||||||
'metadata'
|
'email'
|
||||||
],
|
],
|
||||||
#category : #Holonica
|
#category : #Holonica
|
||||||
}
|
}
|
||||||
@ -35,6 +35,18 @@ HlPerson class >> fromListName: aString [
|
|||||||
givenName: names contents trimmed
|
givenName: names contents trimmed
|
||||||
]
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlPerson >> email [
|
||||||
|
|
||||||
|
^ email
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlPerson >> email: anObject [
|
||||||
|
|
||||||
|
email := anObject
|
||||||
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
HlPerson >> familyName [
|
HlPerson >> familyName [
|
||||||
|
|
||||||
@ -58,15 +70,3 @@ HlPerson >> givenName: anObject [
|
|||||||
|
|
||||||
givenName := anObject
|
givenName := anObject
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
|
||||||
HlPerson >> metadata [
|
|
||||||
|
|
||||||
^ metadata
|
|
||||||
]
|
|
||||||
|
|
||||||
{ #category : #accessing }
|
|
||||||
HlPerson >> metadata: anObject [
|
|
||||||
|
|
||||||
metadata := anObject
|
|
||||||
]
|
|
||||||
|
Loading…
Reference in New Issue
Block a user