A new version of Installer-Core was added to project Installer: http://www.squeaksource.com/Installer/Installer-Core-kph.232.mcz
==================== Summary ====================
Name: Installer-Core-kph.232 Author: kph Time: 2 October 2008, 1:44:35 pm UUID: 86105908-96e5-4490-bcea-91a1f4fe13c4 Ancestors: Installer-Core-kph.231
fix
=============== Diff against Installer-Core-kph.231 ===============
Item was changed: ----- Method: Installer>>webFindUrlToDownload (in category 'web install') ----- webFindUrlToDownload
+ | delay retry | - | delay | delay := 0. self class webSearchPath do: [ :pathSpec | | potentialUrl readPathSpec | readPathSpec := pathSpec value readStream. potentialUrl := (readPathSpec upTo: $*), self package, (readPathSpec upToEnd ifNil: [ '' ]). + [ retry := false. pageDataStream := self urlGet: potentialUrl ] - [ pageDataStream := self urlGet: potentialUrl ] doWhileTrue: [ (pageDataStream notNil and: [ pageDataStream size > 0 ]) ifTrue: [ (pageDataStream contents includesSubString: 'Please slow down a bit') + ifTrue: [ retry := true ] ifFalse: [ pageDataStream reset. ^ potentialUrl ] ]. (Delay forSeconds: (delay := delay + 5)) wait. + retry ]]. - true]]. ^nil !
packages@lists.squeakfoundation.org