[Pharo] Personal fitness tracker web app.
New task for set groups.
src/MyFitnessTracker/MFTSetGroupsTask.class.st
@@ -0,0 +1,61 @@
1
Added:
Class {
2
Added:
#name : 'MFTSetGroupsTask',
3
Added:
#superclass : 'WATask',
4
Added:
#instVars : [
5
Added:
'exercises',
6
Added:
'exerciseCount',
7
Added:
'setGroups'
8
Added:
],
9
Added:
#category : 'MyFitnessTracker-Tasks',
10
Added:
#package : 'MyFitnessTracker',
11
Added:
#tag : 'Tasks'
12
Added:
}
13
Added:
14
Added:
{ #category : 'accessing' }
15
Added:
MFTSetGroupsTask >> exerciseCount [
16
Added:
17
Added:
^ exerciseCount
18
Added:
]
19
Added:
20
Added:
{ #category : 'accessing' }
21
Added:
MFTSetGroupsTask >> exerciseCount: anObject [
22
Added:
23
Added:
exerciseCount := anObject
24
Added:
]
25
Added:
26
Added:
{ #category : 'accessing' }
27
Added:
MFTSetGroupsTask >> exercises [
28
Added:
29
Added:
^ exercises
30
Added:
]
31
Added:
32
Added:
{ #category : 'accessing' }
33
Added:
MFTSetGroupsTask >> exercises: anObject [
34
Added:
35
Added:
exercises := anObject
36
Added:
]
37
Added:
38
Added:
{ #category : 'running' }
39
Added:
MFTSetGroupsTask >> go [
40
Added:
41
Added:
exercises := self call:
42
Added:
(MFTExercisesForm forExerciseCount: exerciseCount).
43
Added:
exercises ifNil: [ self answer: nil ].
44
Added:
45
Added:
setGroups := self call: (MFTSetGroupsForm forExercises: exercises).
46
Added:
setGroups ifNil: [ self answer: nil ].
47
Added:
48
Added:
self answer: setGroups
49
Added:
]
50
Added:
51
Added:
{ #category : 'accessing' }
52
Added:
MFTSetGroupsTask >> setGroups [
53
Added:
54
Added:
^ setGroups
55
Added:
]
56
Added:
57
Added:
{ #category : 'accessing' }
58
Added:
MFTSetGroupsTask >> setGroups: anObject [
59
Added:
60
Added:
setGroups := anObject
61
Added:
]