[Pharo] Personal fitness tracker web app.
Form component finalized.
src/MyFitnessTracker/MFTFormComponent.class.st
@@ -20,9 +20,12 @@
20
20
| formComponents |
21
21
formComponents := Dictionary newFrom: {
22
22
(#date -> MFTDateFormComponent).
23
Added:
(#setGroups -> MFTSetGroupsFormComponent).
23
24
(#primaryMuscleGroup
24
25
-> MFTPrimaryMuscleGroupFormComponent).
25
Removed:
(#setGroups -> MFTSetGroupsFormComponent) }.
26
Added:
(#secondaryMuscleGroups
27
Added:
-> MFTSecondaryMuscleGroupsFormComponent) }.
28
Added:
26
29
^ formComponents at: anAttribute ifAbsent: [
27
30
self error:
28
31
('no appropriate {1} subclass for setting attribute "{2}"'
@@ -36,8 +39,9 @@
36
39
37
40
| formComponent |
38
41
formComponent := self formComponentFor: anAttribute.
39
Removed:
^ formComponent new modelObject:
40
Removed:
thisContext sender receiver modelObject
42
Added:
^ formComponent new
43
Added:
modelObject: thisContext sender receiver modelObject;
44
Added:
yourself
41
45
]
42
46
43
47
{ #category : 'initialization' }