[Pkg] Installer: Installer-Core-kph.228.mcz

[squeak-dev-noreply at lists.squeakfoundation.org]

Keith Hodges uploaded a new version of Installer-Core to project Installer:
http://www.squeaksource.com/Installer/Installer-Core-kph.228.mcz

==================== Summary ====================

Name: Installer-Core-kph.228
Author: kph
Time: 30 September 2008, 12:58:21 pm
UUID: 99d6602f-0f9c-4c7e-a5ae-d7f4f1936784
Ancestors: Installer-Core-kph.227

fix

=============== Diff against Installer-Core-kph.227 ===============

Item was changed:
  ----- Method: Installer>>webFindUrlToDownload (in category 'web install') -----
  webFindUrlToDownload
  
  	self class webSearchPath do: [ :pathSpec | 
  		| potentialUrl readPathSpec  |
  		readPathSpec := pathSpec value readStream.
  		potentialUrl := (readPathSpec upTo: $*), self package, (readPathSpec upToEnd ifNil: [ '' ]).
  		[ pageDataStream := self urlGet: potentialUrl ] 
  	
  			doWhileTrue: [ 	
  			
  				(pageDataStream notNil and: [ pageDataStream size > 0 ]) 
  					ifTrue: [ (pageDataStream contents includesSubString: 'Please slow down a bit') ifFalse: [ pageDataStream reset. ^ potentialUrl ] ].
+ 				
  				(Delay forSeconds: 2) wait.
+ 				false.
  		].
  				
  	].
  	^nil
  !