[Pkg] The Trunk: Monticello-ul.482.mcz

[commits at source.squeak.org]

Levente Uzonyi uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-ul.482.mcz

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

Name: Monticello-ul.482
Author: ul
Time: 11 September 2011, 10:04:13.218 pm
UUID: e03d4eab-e10d-1a4f-9438-79475193c190
Ancestors: Monticello-cmm.481, Monticello-fbs.468

Merged.

=============== Diff against Monticello-cmm.481 ===============

Item was changed:
  ----- Method: MCDiffyVersion>>baseSnapshot (in category 'as yet unclassified') -----
  baseSnapshot
+ 	| baseVersion |
+ 	baseVersion := self workingCopy repositoryGroup versionWithInfo: base.
+ 	baseVersion ifNil: [Error signal: 'Missing snapshot: ', self baseInfo name].
+ 	^ baseVersion snapshot!
- 	^ (self workingCopy repositoryGroup versionWithInfo: base) snapshot!

Item was changed:
  ----- Method: MCHttpRepository>>allFileNames (in category 'required') -----
  allFileNames
  	| index |
+ 	[self displayProgress: 'Updating ', self description during:[
- 	self displayProgress: 'Updating ', self description during:[
  		index := HTTPSocket httpGet: self locationWithTrailingSlash, '?C=M;O=D' args: nil user: self user passwd: self password.
+ 	]] on: NetworkError do: [ :e | self error: 'Could not access ', location, '(', e className, ')'].
- 	].
  	index isString ifTrue: [self error: 'Could not access ', location].
  	^ self parseFileNamesFromStream: index	!