View raw

1 Class { 2 #name : 'MFTRoutineCreationTask', 3 #superclass : 'WATask', 4 #instVars : [ 5 'routine' 6 ], 7 #category : 'MyFitnessTracker-Web', 8 #package : 'MyFitnessTracker-Web' 9 } 10 11 { #category : 'as yet unclassified' } 12 MFTRoutineCreationTask class >> forRoutine: aMFTRoutine [ 13 14 ^ self new 15 routine: aMFTRoutine; 16 yourself 17 ] 18 19 { #category : 'running' } 20 MFTRoutineCreationTask >> go [ 21 22 routine := MFTRoutine new. 23 routine title: (self request: 'Routine title' default: routine title). 24 self confirm: 'Add workout?'. 25 self answer: routine 26 ] 27 28 { #category : 'accessing' } 29 MFTRoutineCreationTask >> routine: aMFTRoutine [ 30 31 routine := aMFTRoutine 32 ] 33