[Pharo] Personal fitness tracker web app.
Confirmation dialog for item deletion.
Changed files
src/MyFitnessTracker/MFTConfirmDialog.class.st
@@ -0,0 +1,72 @@
1
Added:
Class {
2
Added:
#name : #MFTConfirmDialog,
3
Added:
#superclass : #SBSComponent,
4
Added:
#instVars : [
5
Added:
'action',
6
Added:
'component'
7
Added:
],
8
Added:
#category : #'MyFitnessTracker-Dialogs'
9
Added:
}
10
Added:
11
Added:
{ #category : #public }
12
Added:
MFTConfirmDialog class >> delete: anObject [
13
Added:
14
Added:
^ self new
15
Added:
action: #delete;
16
Added:
component: anObject;
17
Added:
yourself
18
Added:
]
19
Added:
20
Added:
{ #category : #accessing }
21
Added:
MFTConfirmDialog >> action [
22
Added:
23
Added:
^ action
24
Added:
]
25
Added:
26
Added:
{ #category : #accessing }
27
Added:
MFTConfirmDialog >> action: anObject [
28
Added:
29
Added:
action := anObject
30
Added:
]
31
Added:
32
Added:
{ #category : #accessing }
33
Added:
MFTConfirmDialog >> component [
34
Added:
35
Added:
^ component
36
Added:
]
37
Added:
38
Added:
{ #category : #accessing }
39
Added:
MFTConfirmDialog >> component: anObject [
40
Added:
41
Added:
component := anObject
42
Added:
]
43
Added:
44
Added:
{ #category : #rendering }
45
Added:
MFTConfirmDialog >> renderContentOn: html [
46
Added:
47
Added:
html container: [
48
Added:
html heading:
49
Added:
'You are about to ' , action , ' the following component:'.
50
Added:
html heading
51
Added:
level: 2;
52
Added:
with: component class.
53
Added:
html render: component.
54
Added:
html form: [
55
Added:
html
56
Added:
label: [
57
Added:
html
58
Added:
text: 'Are you sure?';
59
Added:
space;
60
Added:
strong: 'This action cannot be undone.' ];
61
Added:
break.
62
Added:
html buttonGroup: [
63
Added:
html formButton
64
Added:
beDanger;
65
Added:
beSubmit;
66
Added:
callback: [ self answer: true ];
67
Added:
with: 'Confirm'.
68
Added:
html formButton
69
Added:
beSecondary;
70
Added:
callback: [ self answer: false ];
71
Added:
with: 'Cancel' ] ] ]
72
Added:
]
src/MyFitnessTracker/MFTExerciseDialog.class.st
@@ -12,6 +12,15 @@
12
12
#category : #'MyFitnessTracker-Dialogs'
13
13
}
14
14
15
Added:
{ #category : #actions }
16
Added:
MFTExerciseDialog class >> edit: aMFTExercise [
17
Added:
18
Added:
^ self new
19
Added:
exercise: aMFTExercise;
20
Added:
addOrEdit: #edit;
21
Added:
yourself
22
Added:
]
23
Added:
15
24
{ #category : #accessing }
16
25
MFTExerciseDialog >> addOrEdit [
17
26