The Trunk: Monticello-eem.709.mcz

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].
  !