! expects Seaside2.6g to be defined
!
! install SqueakSource
!
ifError where
errorCount
output push squeakSourceInstall.out only
errorCount

run
| undef |
undef := SymbolDictionary new.
undef name: #UndefinedSymbols.
UserGlobals at: #UndefinedSymbols put: undef.
UserGlobals at: #UndefinedSymbolList put: (SymbolList with: undef).
true
%

errorCount
commit

run
| basePath dir repository version httpRepository rg |
basePath := GsPackageLibrary getMonticelloRepositoryDirectory .
dir := FileDirectory on: basePath.
repository := MCDirectoryRepository new directory: dir.
MCRepositoryGroup default addRepository: repository.
httpRepository := MCHttpRepository
    location: 'http://seaside.gemstone.com/ss/ss'
    user: ''
    password: ''.
#[	
    'SmaCC.g-dkh.10.mcz', 
    'XML-Parser.g-dkh.12.mcz',
    'Mewa.g-dkh.17.mcz', 
    'TinyWiki.g-dkh.11.mcz',  
    'SqueakSource.g-dkh.1036.mcz'

] do: [:fileName | 
    version := repository loadVersionFromFileNamed: fileName.
    version load.
    rg := version workingCopy repositoryGroup.
    rg addRepository: repository.
    rg addRepository: httpRepository.
].
true
%

errorCount
commit

output pop
errorCount
