David T. Lewis uploaded a new version of Monticello to project The Inbox:
http://source.squeak.org/inbox/Monticello-dtl.710.mcz

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

Name: Monticello-dtl.710
Author: dtl
Time: 13 February 2020, 7:59:28.819893 am
UUID: 8863e728-fcf1-4489-a690-e1dc2eb2eee0
Ancestors: Monticello-eem.709

Let the well-known repository URLs be class variables. Allows ReleaseBuilder to work cleanly with a location other http://source.squeak.org.trunk, e.g. http://www.squeaksource.com/TrunkUpdateStreamV3

=============== Diff against Monticello-eem.709 ===============

Item was changed:
  MCFileBasedRepository subclass: #MCHttpRepository
  	instanceVariableNames: 'location user password readerCache indexed webClient'
+ 	classVariableNames: 'InboxURLString TreatedURLString TrunkURLString UseSharedWebClientInstance'
- 	classVariableNames: 'UseSharedWebClientInstance'
  	poolDictionaries: ''
  	category: 'Monticello-Repositories'!

Item was changed:
  ----- Method: MCHttpRepository class>>inbox (in category 'well-known repositories') -----
  inbox
  	^ MCRepositoryGroup default repositories
  		detect:
  			[ : each | each isInbox ]
  		ifNone:
  			[ MCHttpRepository
+ 				location: InboxURLString
- 				location: MCHttpRepository inboxUrlString
  				user: 'squeak'
  				password: 'squeak' ]!

Item was removed:
- ----- Method: MCHttpRepository class>>inboxUrlString (in category 'accessing') -----
- inboxUrlString
- 	^ 'http://source.squeak.org/inbox'!

Item was changed:
  ----- Method: MCHttpRepository class>>initialize (in category 'class initialization') -----
  initialize
  	self unload.
+ 	InboxURLString := 'http://source.squeak.org/inbox'.
+ 	TreatedURLString :=  'http://source.squeak.org/treated'.
+ 	TrunkURLString := 'http://source.squeak.org/trunk'.
  	(ServiceRegistry current serviceWithId: #browserMethodMenu) services add: self browseMethodRevisionsService.
  	(ServiceRegistry current serviceWithId: #browserClassMenu) services add: self browseClassRevisionsService!

Item was changed:
  ----- Method: MCHttpRepository class>>treated (in category 'well-known repositories') -----
  treated
  	^ MCRepositoryGroup default repositories
  		detect:
  			[ : each | each isTreated ]
  		ifNone:
  			[ MCHttpRepository
+ 				location: TreatedURLString
- 				location: MCHttpRepository treatedUrlString
  				user: 'squeak'
  				password: 'squeak' ]!

Item was removed:
- ----- Method: MCHttpRepository class>>treatedUrlString (in category 'accessing') -----
- treatedUrlString
- 	^ 'http://source.squeak.org/treated'!

Item was changed:
  ----- Method: MCHttpRepository class>>trunk (in category 'well-known repositories') -----
  trunk
  	^ MCRepositoryGroup default repositories
  		detect:
  			[ : each | each isTrunk ]
  		ifNone:
  			[ MCHttpRepository
+ 				location: TrunkURLString
- 				location: MCHttpRepository trunkUrlString
  				user: 'squeak'
  				password: 'squeak' ]!

Item was changed:
  ----- Method: MCHttpRepository class>>trunkUrlString (in category 'accessing') -----
  trunkUrlString
+ 	^ TrunkURLString!
- 	^ 'http://source.squeak.org/trunk'!

Item was changed:
  ----- Method: MCHttpRepository>>isInbox (in category 'testing') -----
  isInbox
+ 	^ location = InboxURLString!
- 	^ location = self class inboxUrlString!

Item was changed:
  ----- Method: MCHttpRepository>>isTreated (in category 'testing') -----
  isTreated
+ 	^ location = TreatedURLString!
- 	^ location = self class treatedUrlString!

Item was changed:
  ----- Method: MCHttpRepository>>isTrunk (in category 'testing') -----
  isTrunk
+ 	^ location = TrunkURLString!
- 	^ location = self class trunkUrlString!