Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
GemStone/S 3.1.0.1 is shipping
| version cacheRepository mcVersion |
cacheRepository := MCDirectoryRepository new
directory: (FileDirectory on: '<path to seaside cache repository>').
"Copy configuration to cacheRepository"
mcVersion := (Gofer new
gemsource: 'MetacelloRepository';
package: 'ConfigurationOfSeaside30') resolved first version.
cacheRepository storeVersion: mcVersion.
"fetch packages needed to load Seaside30"
version := ConfigurationOfSeaside30 project version: '3.0.7.1'.
version ignoreImage: true.
version cacheRepository: cacheRepository.
version fetch.
Gofer new
gemsource: 'MetacelloRepository';
package: 'ConfigurationOfGLASS';
package: 'ConfigurationOfSeaside30';
load.
set user DataCurator pass swordfish
login
run
| seasideCacheRepository |
UserGlobals
at: #BootstrapRepositoryDirectory
put: GsPackageLibrary getMonticelloRepositoryDirectory.
true
%
run
UserGlobals
at: #BootstrapApplicationLoadSpecs
put: {
{ 'ConfigurationOfGLASS'. '1.0-beta.8.7.3'. #('default'). BootstrapRepositoryDirectory. } .
{ 'ConfigurationOfSeaside30'.
'3.0.7.1'.
#('default').
'<path to seaside cache repository>'.
} .
}.
true
%
commit
logout
set user DataCurator pass swordfish
login
run
UserGlobals
at: #BootstrapRepositoryDirectory
put: GsPackageLibrary getMonticelloRepositoryDirectory.
true
%
run
UserGlobals
at: #BootstrapApplicationLoadSpecs
put: {
{ 'ConfigurationOfGLASS'. '1.0-beta.8.7.3'. #('default'). BootstrapRepositoryDirectory. } .
}.
true
%
commit
logout
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.