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

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

Name: Monticello-ul.753
Author: ul
Time: 21 September 2021, 2:15:55.535367 pm
UUID: 8bad0511-2475-44ae-8c8a-2e8db688d2e9
Ancestors: Monticello-ul.752

- added missing vertical bars to empty blocks

=============== Diff against Monticello-ul.752 ===============

Item was changed:
  ----- Method: MCMcdReader>>loadPatch (in category 'loading') -----
  loadPatch
  	| old new |
  	(self zip memberNamed: 'patch.bin') ifNotNil:
  		[:m | [^ patch := (DataStream on: m contentStream) next ]
+ 			on: Error do: [:fallThrough| ]].
- 			on: Error do: [:fallThrough ]].
  	definitions := OrderedCollection new.
  	(self zip membersMatching: 'old/*')
  		do: [:m | self extractDefinitionsFrom: m].
  	old := definitions asArray.
  	definitions := OrderedCollection new.
  	(self zip membersMatching: 'new/*')
  		do: [:m | self extractDefinitionsFrom: m].
  	new := definitions asArray.
  	^ patch := self buildPatchFrom: old to: new.
  	!

Item was changed:
  ----- Method: MCMczReader>>loadDefinitions (in category 'loading') -----
  loadDefinitions
  	definitions := OrderedCollection new.
  	(self zip memberNamed: 'snapshot.bin') ifNotNil:
  		[:m | [^ definitions := (DataStream on: m contentStream) next definitions]
+ 			on: Error do: [:fallThrough| ]].
- 			on: Error do: [:fallThrough ]].
  	"otherwise"
  	(self zip membersMatching: 'snapshot/*')
  		do: [:m | self extractDefinitionsFrom: m].
  !

Item was changed:
  ----- Method: MCPatch>>initializeWithBase:target: (in category 'initialize-release') -----
  initializeWithBase: baseSnapshot target: targetSnapshot
  	| base target |	
  	operations := OrderedCollection new.
  	base := MCDefinitionIndex definitions: baseSnapshot definitions.
  	target := MCDefinitionIndex definitions: targetSnapshot definitions.
  	
  	target definitionsDo:
  		[:t |
  		base
  			definitionLike: t
  			ifPresent: [:b | (b isSameRevisionAs: t) ifFalse: [operations add: (MCModification of: b to: t)]]
  			ifAbsent: [operations add: (MCAddition of: t)]].
  		
  	base definitionsDo:
  		[:b |
  		target
  			definitionLike: b
+ 			ifPresent: [:t|]
- 			ifPresent: [:t]
  			ifAbsent: [operations add: (MCRemoval of: b)]]		!

Item was changed:
  ----- Method: MCVersion>>withAllDependenciesDo: (in category 'enumerating') -----
  withAllDependenciesDo: aBlock
+ 	self allDependenciesDo: aBlock ifUnresolved: [:ignored|].
- 	self allDependenciesDo: aBlock ifUnresolved: [:ignored].
  	aBlock value: self!