Accessors.
This commit is contained in:
parent
571427c512
commit
bed5c107ee
@ -8,3 +8,38 @@ Class {
|
||||
],
|
||||
#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