Updated MFTPageManager setters and getters.

Commit
3c0dbca519d99209ed04e32f138987fd9b6f1ca6
Author
Marius Peter <marius.peter@tutanota.com>
Author date
Committer
Marius Peter <marius.peter@tutanota.com>
Committer date
src/MyFitnessTracker/MFTPageManager.class.st
index 25928af1..466ffb63 100644..100644
@@ -18,9 +18,9 @@
18 18 ]
19 19
20 20 { #category : #accessing }
21 Removed: MFTPageManager >> activePage: aKey [
21 Added: MFTPageManager >> activePage: aMFTPage [
22 22
23 Removed: activePage := mainPages at: aKey
23 Added: activePage := aMFTPage
24 24 ]
25 25
26 26 { #category : #'as yet unclassified' }
@@ -73,15 +73,15 @@
73 73 { #category : #'as yet unclassified' }
74 74 MFTPageManager >> loadPublicPages [
75 75
76 Removed: mainPages at: 1 put: MFTPublicLandingPage new.
77 Removed: self activePage: 1
76 Added: mainPages := self defaultPublicPages.
77 Added: self setActivePageAt: #landing
78 78 ]
79 79
80 80 { #category : #'as yet unclassified' }
81 81 MFTPageManager >> loadUserPages [
82 82
83 Removed: mainPages do: [ :page | page loadUserData ].
84 Removed: self activePage: #landing
83 Added: mainPages at: #landing put: MFTUserLandingPage new.
84 Added: self setActivePageAt: #landing
85 85 ]
86 86
87 87 { #category : #accessing }
@@ -106,4 +106,10 @@
106 106 MFTPageManager >> mainPages: aCollection [
107 107
108 108 mainPages := aCollection
109 Added: ]
110 Added:
111 Added: { #category : #accessing }
112 Added: MFTPageManager >> setActivePageAt: aKey [
113 Added:
114 Added: activePage := mainPages at: aKey
109 115 ]