[Pharo] Personal fitness tracker web app.
Update MFTWorkoutPlan.
src/MyFitnessTracker-Core/MFTWorkoutPlan.class.st
@@ -5,7 +5,8 @@
5
5
#name : 'MFTWorkoutPlan',
6
6
#superclass : 'MFTObject',
7
7
#instVars : [
8
Removed:
'workouts'
8
Added:
'workouts',
9
Added:
'user'
9
10
],
10
11
#category : 'MyFitnessTracker-Core',
11
12
#package : 'MyFitnessTracker-Core'
@@ -15,18 +16,43 @@
15
16
MFTWorkoutPlan >> addWorkout: aMFTWorkout [
16
17
17
18
workouts addLast: aMFTWorkout.
18
Removed:
aMFTWorkout ifNotNil: [ aMFTWorkout plan: self ]
19
Added:
aMFTWorkout plan: self
19
20
]
20
21
22
Added:
{ #category : 'adding' }
23
Added:
MFTWorkoutPlan >> addWorkouts: aMFTWorkoutCollection [
24
Added:
25
Added:
workouts addAll: aMFTWorkoutCollection.
26
Added:
aMFTWorkoutCollection do: [ :workout | workout plan: self ]
27
Added:
]
28
Added:
21
29
{ #category : 'accessing' }
22
Removed:
MFTWorkoutPlan >> initialize: aMFTWorkoutCollection [
30
Added:
MFTWorkoutPlan >> initialize [
23
31
24
32
super initialize.
25
Removed:
workouts := aMFTWorkoutCollection
33
Added:
workouts := OrderedCollection new
26
34
]
27
35
28
36
{ #category : 'accessing' }
37
Added:
MFTWorkoutPlan >> user [
38
Added:
39
Added:
^ user
40
Added:
]
41
Added:
42
Added:
{ #category : 'accessing' }
43
Added:
MFTWorkoutPlan >> user: aMFTUser [
44
Added:
45
Added:
user := aMFTUser
46
Added:
]
47
Added:
48
Added:
{ #category : 'accessing' }
29
49
MFTWorkoutPlan >> workouts [
30
50
31
51
^ workouts
52
Added:
]
53
Added:
54
Added:
{ #category : 'accessing' }
55
Added:
MFTWorkoutPlan >> workouts: aMFTWorkoutCollection [
56
Added:
57
Added:
workouts := aMFTWorkoutCollection
32
58
]