[etoys-dev] Etoys: Monticello-kfr.401.mcz

[commits at source.squeak.org]

Karl Ramberg uploaded a new version of Monticello to project Etoys:
http://source.squeak.org/etoys/Monticello-kfr.401.mcz

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

Name: Monticello-kfr.401
Author: kfr
Time: 21 May 2011, 12:02:52 am
UUID: 3ced2659-e5dc-2b49-9933-13e68c9fe8bf
Ancestors: Monticello-bf.400

Fix layout of MC window

=============== Diff against Monticello-bf.400 ===============

Item was added:
+ (PackageInfo named: 'Monticello') preamble: 'nil'!

Item was changed:
  ----- Method: MCSaveVersionDialog>>widgetSpecs (in category 'as yet unclassified') -----
  widgetSpecs
  	^ #(	
+ 		((textMorph: versionName) (0 0 1 0) (0 0 0 35))
+ 		((textMorph: logMessage) (0 0 1 1) (0 35 0 -40))
- 		((textMorph: versionName) (0 0 1 0) (0 0 0 30))
- 		((textMorph: logMessage) (0 0 1 1) (0 30 0 -30))
  		((buttonRow) (0 1 1 1) (0 -40 0 0))
  		)!

Item was changed:
  ----- Method: MCWorkingCopyBrowser>>saveVersion (in category 'actions') -----
  saveVersion
  	| repo |
  	self canSave ifFalse: [^self].
  	self checkForNewerVersions ifFalse: [^self].
  	repo := self repository.
  	workingCopy newVersion ifNotNil:
  		[:v |
+ 		(MCVersionInspector new version: v) show. self beep.
- 		(MCVersionInspector new version: v) show.
  		Cursor wait showWhile: [repo storeVersion: v].
  		MCCacheRepository default cacheAllFileNamesDuring: 
  			[repo cacheAllFileNamesDuring: 
  				[v allAvailableDependenciesDo:
  					[:dep |
  					(repo includesVersionNamed: dep info name)
  						ifFalse: [repo storeVersion: dep]]]]]!