[squeak-dev] The Trunk: Monticello-bf.655.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Nov 25 10:47:21 UTC 2016


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

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

Name: Monticello-bf.655
Author: bf
Time: 25 November 2016, 11:47:14.230808 am
UUID: 1ff590a7-e31f-479e-9404-9ab20cb77bf6
Ancestors: Monticello-cmm.654

Display timestamp and category in Editions list (similar to version history)

=============== Diff against Monticello-cmm.654 ===============

Item was added:
+ ----- Method: MCDefinition>>summaryAndRevision (in category 'printing') -----
+ summaryAndRevision
+ 	^self summary!

Item was added:
+ ----- Method: MCMethodDefinition>>summaryAndRevision (in category 'printing') -----
+ summaryAndRevision
+ 	^String streamContents:
+ 		[:s | s nextPutAll: self timeStamp;
+ 			space; nextPutAll: self summary;
+ 			nextPutAll: ' {'; nextPutAll: self category;
+ 			nextPut: $}]!

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

Item was added:
+ ----- Method: MCPatchOperation>>summaryAndRevision (in category 'accessing') -----
+ summaryAndRevision
+ 	^ self definition summaryAndRevision, self summarySuffix!



More information about the Squeak-dev mailing list