====== Version Info ======
* added a new class instance variable packagingClassName to GdkSystem.
* This is the name of the packaging class in the JwxPackaging app and must be set by subclasses.
* see VpSystem class>>initialize for an example
* initialize
super initialize.
"Assign the Configuration Map that is used to package this system."
self configMapName: 'JAS Packaging: VideoPlayback'.
self packagingClassName: 'JwxVpNT'
* also need to modify packagingRulesFor: on the class side of the app that contains the *System app
* aRuleCollector
initializeClassVariable: 'ConfigMapTimeStamp'
to: 'JwvJACS assignVersionTimeStampFromLoadedConfigMap'
inClassNamed: #GdkSystem.
aRuleCollector
initializeClassVariable: 'ConfigMapVersionName'
to: 'JwvJACS assignVersionNameFromLoadedConfigMap'
inClassNamed: #GdkSystem.
aRuleCollector
initializeClassVariable: 'PackagingInstructionsClassAndVersion'
to: 'JwvJACS assignPackagingInstructionsClassAndVersion'
inClassNamed: #GdkSystem.
aRuleCollector doNotReduceSubApplicationNamed: #JwcDynamicBehaviorApp
gatherVersionInfo
| packageTimeStampLocal configMapTimeStampLocal temp displayData |
displayData := WriteStream on: (String new: 512).
configMapTimeStampLocal := self fixVersionInfoData: self configMapTimeStamp.
packageTimeStampLocal := self fixVersionInfoData: self class packageTimeStamp.
displayData
cr;
nextPutAll: '-------------------------------------------------------------------';
cr;
nextPutAll: 'Configuration Map - ' , self class configMapName;
cr;
nextPutAll: ' TimeStamp - ' , configMapTimeStampLocal;
cr;
nextPutAll: ' Version - ' , self configMapVersionName;
cr;
cr;
nextPutAll: 'Package TimeStamp - ' , packageTimeStampLocal;
cr;
nextPutAll: 'Packaging Instructions - ' , self packagingInstructionsClassAndVersion;
cr;
nextPutAll: '-------------------------------------------------------------------';
cr.
^displayData contents