Etoys: Monticello-kfr.401.mcz

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

_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev