The Trunk: Monticello-bf.656.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: Monticello-bf.656.mcz

commits-2
Bert Freudenberg uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-bf.656.mcz

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

Name: Monticello-bf.656
Author: bf
Time: 25 November 2016, 12:17:47.494828 pm
UUID: b1f7d626-c985-4400-9d5e-4cc68459b1cf
Ancestors: Monticello-bf.655

Don't shadow 'label' var. Also, rename single use of "editions".

=============== Diff against Monticello-bf.655 ===============

Item was removed:
- ----- Method: MCOperationsBrowser>>isViewingEditions (in category 'accessing') -----
- isViewingEditions
- ^self items size > 1 and:
- [self items allSatisfy:
- [:each | each definition isRevisionOf: self items first definition]]!

Item was added:
+ ----- Method: MCOperationsBrowser>>isViewingRevisions (in category 'accessing') -----
+ isViewingRevisions
+ ^self items size > 1 and:
+ [self items allSatisfy:
+ [:each | each definition isRevisionOf: self items first definition]]!

Item was changed:
  ----- Method: MCOperationsBrowser>>list (in category 'accessing') -----
  list
  | showRevision |
+ showRevision := self isViewingRevisions.
+ ^ self items collect: [:each | | summary |
+ summary := showRevision ifTrue: [each summaryAndRevision] ifFalse: [each summary].
- showRevision := self isViewingEditions.
- ^ self items collect: [:each | | label |
- label := showRevision ifTrue: [each summaryAndRevision] ifFalse: [each summary].
  (self reverts includes: each)
+ ifFalse: [summary]
- ifFalse: [label]
  ifTrue: [Text
+ string: '( ', summary, ' )'
- string: '( ', label, ' )'
  attributes: (self userInterfaceTheme revertedOperationAttributes ifNil: [{TextEmphasis struckOut}])]]!