[squeak-dev] The Trunk: Monticello-cmm.659.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Dec 8 04:36:06 UTC 2016


Chris Muller uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-cmm.659.mcz

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

Name: Monticello-cmm.659
Author: cmm
Time: 7 December 2016, 10:35:58.341395 pm
UUID: 0ac4585a-0c38-4f00-9d85-b0ee443b0631
Ancestors: Monticello-cmm.658

Fix menu activation on selected method or class which has no MC working copy defined.

=============== Diff against Monticello-cmm.658 ===============

Item was changed:
  ----- Method: Class>>workingCopy (in category '*monticello') -----
  workingCopy
+ 	"Answer the MCWorkingCopy in which I am defined."
+ 	^ self packageInfo ifNotNil: [ : pi | pi workingCopy ]!
- 	^ self packageInfo workingCopy!

Item was changed:
  ----- Method: MCDefinition>>mcModel (in category 'private') -----
  mcModel
  	"Find my WorkingCopy, use the first mcModel-capable repository in its reposigoryGroup."
+ 	self repositoryGroup ifNotNil:
+ 		[ : group | group repositoriesDo:
+ 			[ : each | each mcModel ifNotNilDo:
+ 				[ : mcModel | ^ mcModel ] ] ].
- 	self repositoryGroup repositoriesDo:
- 		[ : each | each mcModel ifNotNilDo:
- 			[ : mcModel | ^ mcModel ] ].
  	^ nil!

Item was changed:
  ----- Method: MCDefinition>>repositoryGroup (in category 'repositories') -----
  repositoryGroup
  	"Answer the MCRepositoryGroup from which this this object was loaded."
+ 	^ self workingCopy ifNotNil: [ : wc | wc repositoryGroup ]!
- 	^ self workingCopy repositoryGroup!

Item was changed:
  ----- Method: MethodReference>>workingCopy (in category '*monticello') -----
  workingCopy
  	"Answer the MCWorkingCopy in which I am defined."
+ 	^ self packageInfo ifNotNil: [ : pi | pi workingCopy ]!
- 	^ self packageInfo workingCopy!



More information about the Squeak-dev mailing list