[squeak-dev] The Trunk: Monticello-eem.709.mcz

commits at source.squeak.org commits at source.squeak.org
Thu Mar 5 19:40:48 UTC 2020


Nicolas Cellier uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-eem.709.mcz

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

Name: Monticello-eem.709
Author: eem
Time: 24 January 2020, 6:17:42.907101 pm
UUID: ec11ed59-223d-4b58-aa08-c214e1ceb2e9
Ancestors: Monticello-cmm.708

Provide 'filter out unchanged methods...' to ignore any timestamp-only changes.

=============== Diff against Monticello-cmm.708 ===============

Item was added:
+ ----- Method: MCOperationsBrowser>>filterOutUnchangedMethods (in category 'actions') -----
+ filterOutUnchangedMethods
+ 	"Remove from the list methods that only have changed timestamps"
+ 	| unchangedMethods |
+ 	unchangedMethods := self unchangedMethods.
+ 	(self confirm: ('Ignore {1} methods that only differ in timestamp?' translated
+ 		format: {unchangedMethods size}))
+ 		ifTrue:
+ 			[items := items reject: [:op| op isUnchangedMethod].
+ 			 self changed: #list]
+ !

Item was changed:
  ----- Method: MCOperationsBrowser>>methodListMenu: (in category 'menus') -----
  methodListMenu: aMenu
  	selection ifNotNil:
  		[aMenu addList: #(
  			('install'	 installSelection)
  			('revert (x)'	 revertSelection)
  			('browse origin' browseSelectionOrigin) 
  			-)].
  	self unchangedMethods ifNotEmpty:
  		[aMenu addList: #(
  			('revert unchanged methods...'	revertUnchangedMethods) 
+ 			('filter out unchanged methods...'	filterOutUnchangedMethods) 
  			-)].
  	super methodListMenu: aMenu.
  	^ aMenu!

Item was changed:
  ----- Method: MCOperationsBrowser>>revertUnchangedMethods (in category 'actions') -----
  revertUnchangedMethods
  	"revert methods that only have changed timestamps"
  	| loader unchangedMethods |
+ 	unchangedMethods := self unchangedMethods.
+ 	(self confirm: ('Revert {1} methods that only differ in timestamp?' translated
+ 		format: {unchangedMethods size}))
+ 		ifTrue:
+ 			[loader := MCPackageLoader new.
- 	unchangedMethods := items select: [:op | op isUnchangedMethod].
- 	(self confirm: ('Revert {1} methods that only differ in timestamp?' translated format: {unchangedMethods size}))
- 		ifTrue: [
- 			loader := MCPackageLoader new.
  			unchangedMethods do: [:op | op inverse applyTo: loader].
  			loader loadWithName: self changeSetNameForInstall].
  !



More information about the Squeak-dev mailing list