The Trunk: MonticelloConfigurations-mt.145.mcz

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

The Trunk: MonticelloConfigurations-mt.145.mcz

commits-2
Marcel Taeumel uploaded a new version of MonticelloConfigurations to project The Trunk:
http://source.squeak.org/trunk/MonticelloConfigurations-mt.145.mcz

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

Name: MonticelloConfigurations-mt.145
Author: mt
Time: 22 August 2016, 10:54:09.101045 am
UUID: 70a7747c-6b49-3949-b597-4b9290874060
Ancestors: MonticelloConfigurations-mt.144

Small tweak for the update information in the release.

=============== Diff against MonticelloConfigurations-mt.144 ===============

Item was changed:
  ----- Method: MCMcmUpdater>>doUpdate: (in category 'updating') -----
  doUpdate: interactive
  "Update the image by loading all pending updates from the server. If this is
  the default updater for the system, update the system version when complete.
  If interteractive use a modal notifier, otherwise only update the transcript.
  Flush all caches. If a previous download failed this is often helpful"
 
  | config previousUpdateLevel |
  previousUpdateLevel := SystemVersion current highestUpdate.
  MCFileBasedRepository flushAllCaches.
  config := self updateFromRepositories: { self repository }.
  config ifNil: [
  interactive ifTrue: [ ^self inform: 'Unable to retrieve updates from remote repository.' translated ].
  Transcript cr; show: '==========  Unable to retrieve updates from remote repository. ==========' translated; cr.
  ^ self ].
  MCMcmUpdater default == self
  ifTrue: [
  config setSystemVersion.
  interactive ifTrue: [
+ self inform: ('Update completed.\\Version: {1}\Update: {3}{2}\\Url: {4}\Map: ''{5}''{6}' translated withCRs format: {
- self inform: ('Update completed.\\Version: {1}\Update: {3}{2}\\Url: {4}\Map: ''{5}''\\{6}' translated withCRs format: {
  SystemVersion current version.
  SystemVersion current highestUpdate.
  previousUpdateLevel = SystemVersion current highestUpdate
  ifTrue: ['']
  ifFalse: [previousUpdateLevel asString, ' -> '].
  self repository.
  MCMcmUpdater updateMapName.
+ SystemVersion current description ifEmpty: [''] ifNotEmpty: [:d | String cr, String cr, d]})].
- SystemVersion current description})].
  Transcript cr;
  show: '==========  Update completed:  ' translated;
  show: previousUpdateLevel;
  show: ' -> ' ;
  show: SystemVersion current highestUpdate;
  show: ' =========='; cr ]
  ifFalse: [
  interactive
  ifTrue: [ self inform: 'Update completed.' ].
  Transcript cr; show: '==========  Update completed. ==========' translated; cr ]
  !