Packaging Workspaces

There are packaging workspaces to create a base dev and packaged image on z:\jas\reddrive\packaging adn 7.5 images

"********************************************************************************" !
"* This abt.cnf file creates the Hello World reduced runtime packaged image     *" !
"********************************************************************************" !

PostStartUp !

System loadedSubApplications do: [:app | app recacheMethodPointers.]!

((EmConfigurationMap editionsFor: 'ENVY/Packager Automation') first loadWithRequiredMaps) ifFalse: [System exit]. !

| abs |
(abs := AbtBuildSpecification name: 'Hello World'
	mapWithPackagingInstructions: 'ENVY/Packager Examples'
	packagingInstructions:  'HelloWorldPackagingInstructions'
	mapsWithAppsToPackage: #('Hello World')) isNil 
	ifTrue: [TranscriptTTY default show: 'Build spec is nil. See Hello World_HelloWorldPackagingInstructions.log'. System exit]. 

abs build. 

System loadedSubApplications do: [:app | app recacheMethodPointers.]!

(EmConfigurationMap editionsFor: 'Hello World') first load. !

" store the result of packaging. will be true if successful " !
Smalltalk at: #xyzzy put: (EpPackager packageUsingInstructions: HelloWorldPackagingInstructions withProgressMessage: 
(DirectedMessage receiver: EpPackager basicNew selector: #packageApplicationsFractionComplete:progressDialog: arguments: 
(Array with: 0 with: EtProgressReporter basicNew)))!


(Smalltalk at: #xyzzy) ifTrue: [TranscriptTTY default show: 'CTestPass';cr]

System loadedSubApplications do: [:app | app recacheMethodPointers.]!

((EmConfigurationMap editionsFor: 'ENVY/Packager Automation') first loadWithRequiredMaps) ifFalse: [System exit]. !

| abs |
(abs := AbtBuildSpecification name: 'Hello World XD'
            mapWithPackagingInstructions: 'ENVY/XD Examples' "use latest map whether edition or version"
            packagingInstructions: 'HelloWorldXDPackagingInstructions'
            mapsWithAppsToPackage: #('Hello World') "use latest map whether edition or version"
            xdFeatures: #()
            xdEnvironment: (System configuredSubsystems at: 'OS') 
            xdImageSubsystems: nil) isNil 
    ifTrue: [TranscriptTTY default show: 'Build spec is nil. See Hello World_HelloWorldPackagingInstructions.log'. System exit]. 

abs build. 

TranscriptTTY default show: 'CTestPass';cr.