[Pkg] The Trunk: Monticello-eem.501.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Apr 13 17:24:08 UTC 2012

Eliot Miranda uploaded a new version of Monticello to project The Trunk:

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

Name: Monticello-eem.501
Author: eem
Time: 13 April 2012, 10:23:47.129 am
UUID: 67c398f4-47b9-47eb-b0a2-f3cfd2323058
Ancestors: Monticello-bf.500

In the working copy browser's repoisitory list, make
load/save repositories & flush cached versions available
when no repository is selected (since these apply to all
repositories).  Also group them at the end of the menu
when a repository is selected to indicate they apply to all.
Add a line to be nice.

=============== Diff against Monticello-bf.500 ===============

Item was changed:
  ----- Method: MCTool>>fillMenu:fromSpecs: (in category 'morphic ui') -----
  fillMenu: aMenu fromSpecs: anArray
  	anArray do:
  		[:spec |
+ 		spec == #addLine
+ 			ifTrue: [aMenu addLine]
+ 			ifFalse:
+ 				[aMenu
+ 					add: spec first
+ 					target: self
+ 					selector: spec second
+ 					argumentList: (spec allButFirst: 2)]].
+ 	^aMenu!
- 		aMenu add: spec first target: self selector: spec second argumentList: (spec allButFirst: 2)].
- 	^ aMenu!

Item was changed:
  ----- Method: MCWorkingCopyBrowser>>repositoryListMenu: (in category 'morphic ui') -----
  repositoryListMenu: aMenu
+ 	self repository ifNil:
+ 		[^self fillMenu: aMenu fromSpecs:
+ 		#(	('load repositories' #loadRepositories)
+ 		 	('save repositories' #saveRepositories)
+ 			('flush cached versions' #flushAllCaches))].
- 	self repository ifNil: [^ aMenu].
  	self fillMenu: aMenu fromSpecs:
  		#(('open repository' #openRepository)
  		    ('edit repository info' #editRepository)
  		   ('add to package...' #addRepositoryToPackage)
+ 		   ('remove repository' #removeRepository)
- 		   ('remove repository' #removeRepository)	
- 		   ('load repositories' #loadRepositories)	
- 		   ('save repositories' #saveRepositories)
- 		   ('flush cached versions' #flushAllCaches)	
  		   ('copy image versions here' #copyImageVersions)
+ 		   #addLine
+ 		   ('load repositories' #loadRepositories)
+ 		   ('save repositories' #saveRepositories)
+ 		   ('flush cached versions' #flushAllCaches)).
+ 	aMenu
- 		).
- 		aMenu
  		add: (self repository alwaysStoreDiffs
  					ifTrue: ['store full versions']
  					ifFalse: ['store diffs'])
  		target: self
  		selector: #toggleDiffs.
  	^ aMenu

More information about the Packages mailing list