Utils

Commit
84ef1875175154fe6e0a288533d97ac1509282fe
Author
Marius Peter <marius.peter@tutanota.com>
Author date
Committer
Marius Peter <marius.peter@tutanota.com>
Committer date
src/MyFitnessTracker/MFTUtils.class.st
index ee4d5572..fa3384d4 100644..100644
@@ -76,20 +76,36 @@
76 76 | stdout |
77 77 version := aVersion.
78 78 stdout := NonInteractiveTranscript stdout.
79 Removed: stdout crShow: 'Setting the image in server mode.'.
79 Added: stdout crShow: 'Creating MFT deployment image.'.
80 Added: stdout crShow: 'Setting the image in server mode...'.
80 81 WorldState serverMode: true.
81 Removed: stdout crShow: 'Disabling development tools.'.
82 Added:
83 Added: stdout crShow:
84 Added: 'The following handlers are registered with the default dispatcher:'.
85 Added: stdout crShow: WAAdmin defaultDispatcher handlers keys asString.
86 Added: stdout crShow: 'Clearing default dispatcher, caches, and sessions...'.
87 Added: WAAdmin clearAll.
88 Added: stdout crShow: 'Disabling development tools...'.
82 89 WAAdmin disableDevelopmentTools.
83 Removed: stdout crShow: 'Clearing default dispatcher, caches, and sessions.'.
84 Removed: "WAAdmin clearAll."
90 Added: stdout crShow: 'Initializing MFTRootComponent...'.
91 Added: MFTRootComponent initialize.
92 Added: stdout crShow: 'Cleaning up image for release...'.
93 Added: ImageCleaner cleanUpForRelease.
94 Added: stdout crShow: 'MFT deployment image created successfully.'.
85 95 stdout crShow:
86 Removed: 'Setting the default Seaside dispatcher to ''MyFitnessTracker''.'.
87 Removed: WAAdmin defaultDispatcher defaultName: 'MyFitnessTracker'.
88 Removed: stdout crShow: 'Cleaning up image for release.'.
89 Removed: "ImageCleaner cleanUpForRelease."
96 Added: 'The following handlers are registered with the default dispatcher:'.
97 Added: stdout crShow: WAAdmin defaultDispatcher handlers keys asString.
90 98 stdout crShow: 'Saving and exiting from image.'.
99 Added: stdout cr.
91 100 stdout close.
92 101 SmalltalkImage current snapshot: true andQuit: true
102 Added: ]
103 Added:
104 Added: { #category : #'as yet unclassified' }
105 Added: MFTUtils class >> isDevelopmentImage [
106 Added: "If the current MFT image has no version, it is a development version."
107 Added:
108 Added: version ifNil: [ ^ true ] ifNotNil: [ ^ false ]
93 109 ]
94 110
95 111 { #category : #versions }