No more form body.

Commit
c60ecb78028c15d3cfd7c49925c41ebb22fdedd4
Author
Marius Peter <marius.peter@tutanota.com>
Author date
Committer
Marius Peter <marius.peter@tutanota.com>
Committer date
src/MyFitnessTracker/MFTForm.class.st
index 98a20bff..f12a79fc 100644..100644
@@ -9,8 +9,7 @@
9 9 #superclass : 'SBSComponent',
10 10 #instVars : [
11 11 'modelObject',
12 Removed: 'heading',
13 Removed: 'body'
12 Added: 'heading'
14 13 ],
15 14 #category : 'MyFitnessTracker-Forms',
16 15 #package : 'MyFitnessTracker',
@@ -27,8 +26,7 @@
27 26 MFTForm >> initialize [
28 27
29 28 super initialize.
30 Removed: heading := 'Form heading'.
31 Removed: body := Array new
29 Added: heading := 'Form heading'
32 30 ]
33 31
34 32 { #category : 'accessing' }
@@ -46,22 +44,7 @@
46 44 { #category : 'rendering' }
47 45 MFTForm >> renderContentOn: html [
48 46
49 Removed: self renderFormOn: html
50 Removed: ]
51 Removed:
52 Removed: { #category : 'as yet unclassified' }
53 Removed: MFTForm >> renderFormOn: html [
54 Removed:
55 Removed: html container
56 Removed: style: 'max-width: 40rem';
57 Removed: with: [
58 Removed: html displayHeading
59 Removed: level: 3;
60 Removed: with: heading.
61 Removed: html form: [
62 Removed: body do: [ :bodyComponent | html render: bodyComponent ].
63 Removed: html horizontalRule.
64 Removed: self renderSubmitOn: html ] ]
47 Added: self renderFormOn: html with: [ html render: modelObject ]
65 48 ]
66 49
67 50 { #category : 'as yet unclassified' }