! install FastCGI to use Apache as http server
!  installSeaside.topaz should have already been run.
!
!  expects .mcz files to be found in $GEMSTONE/seaside/monticello/repository
!  or ./seaside/monticello/repository
!
ifError where
errorCount
output push fastcgiInstall.out only
display resultcheck
errorCount

! install into UserGlobals
run
| policy |
policy := GsPackagePolicy current.
policy homeSymbolDict:  UserGlobals.
policy externalSymbolList: Array new.
true
%

errorCount
commit

run
| basePath dir repository httpRepository |
basePath := GsPackageLibrary getMonticelloRepositoryDirectory .

dir := FileDirectory on: basePath.
repository := MCDirectoryRepository new directory: dir.
MCRepositoryGroup default addRepository: repository.
httpRepository := MCHttpRepository
    location: 'http://seaside.gemstone.com/ss/fastcgi'
    user: ''
    password: ''.
#[	
    'FastCGIPool-dkh.2.mcz',
    'FastCGI-dkh.19.mcz',
    'FastCGISeaside-dkh.30.mcz'

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

errorCount
commit

output pop
errorCount
