Overridable form submission methods.

Commit
4090577d14d257b68cb4c235470f0222b8f2cdf1
Author
Marius Peter <marius.peter@tutanota.com>
Author date
Committer
Marius Peter <marius.peter@tutanota.com>
Committer date
src/MyFitnessTracker/MFTForm.class.st
index 11fe373f..98a20bff 100644..100644
@@ -17,6 +17,12 @@
17 17 #tag : 'Forms'
18 18 }
19 19
20 Added: { #category : 'as yet unclassified' }
21 Added: MFTForm >> cancelForm [
22 Added:
23 Added: self answer: nil
24 Added: ]
25 Added:
20 26 { #category : 'initialization' }
21 27 MFTForm >> initialize [
22 28
@@ -80,11 +86,17 @@
80 86 html formButton
81 87 beSubmit;
82 88 bePrimary;
83 Removed: callback: [ self answer: modelObject ];
89 Added: callback: [ self submitForm ];
84 90 with: 'Submit'.
85 91 html formButton
86 92 beSubmit;
87 93 beSecondary;
88 Removed: callback: [ self answer: nil ];
94 Added: callback: [ self cancelForm ];
89 95 with: 'Cancel' ]
96 Added: ]
97 Added:
98 Added: { #category : 'as yet unclassified' }
99 Added: MFTForm >> submitForm [
100 Added:
101 Added: self answer: modelObject
90 102 ]