Accessors.
This commit is contained in:
parent
571427c512
commit
bed5c107ee
@ -8,3 +8,38 @@ Class {
|
|||||||
],
|
],
|
||||||
#category : #Holonica
|
#category : #Holonica
|
||||||
}
|
}
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlGroup >> name [
|
||||||
|
|
||||||
|
^ name
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlGroup >> name: anObject [
|
||||||
|
|
||||||
|
name := anObject
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlGroup >> period [
|
||||||
|
|
||||||
|
^ period
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlGroup >> period: datesString [
|
||||||
|
period := datesString
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlGroup >> persons [
|
||||||
|
|
||||||
|
^ persons
|
||||||
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
HlGroup >> persons: anObject [
|
||||||
|
|
||||||
|
persons := anObject
|
||||||
|
]
|
||||||
|
Loading…
Reference in New Issue
Block a user