It seems that there is a load order problem, because I have a message not
understood #setSystemVersionFromConfig: when updating... The old code below
still invoke the Utilities (as well as TheWorldMenu and other senders...)
TheWorldMainDockingBar>>updateSqueak
    Utilities updateFromServer


2013/11/23 <commits at source.squeak.org>

> Frank Shearar uploaded a new version of System to project The Trunk:
> http://source.squeak.org/trunk/System-fbs.620.mcz
>
> ==================== Summary ====================
>
> Name: System-fbs.620
> Author: fbs
> Time: 23 November 2013, 9:13:28.936 pm
> UUID: a640a27d-9472-204b-8a5d-67c861e94eeb
> Ancestors: System-fbs.619
>
> #setSystemVersionFromConfig: clearly belongs better with the parameter's
> class. #updateFromServer belongs (IMO at least) with the class involved
> with updating.
>
> Keep the Utilities stubs, but deprecate them.
>
> =============== Diff against System-fbs.619 ===============
>
> Item was added:
> + ----- Method: MCConfiguration>>setSystemVersion (in category
> '*System-Support-updating') -----
> + setSystemVersion
> +       "Set the current system version date to the latest date found in
> my configuration (or the associated working copy). Also set the highest
> update number to the sum of version numbers in my configuration."
> +
> +       | versionNumbers versionDates |
> +       versionNumbers := self dependencies collect: [:d |
> +               (d versionInfo name copyAfterLast: $.) asInteger].
> +       versionDates := self dependencies collect: [:d |
> +               d versionInfo date
> +                       ifNil: [d package workingCopy ancestors first
> date]].
> +       SystemVersion current
> +               date: versionDates max;
> +               highestUpdate: versionNumbers sum.!
>
> Item was added:
> + ----- Method: MCMcmUpdater class>>updateFromServer (in category
> '*System-Support-updating') -----
> + updateFromServer
> +       "Update the image by loading all pending updates from the server."
> +       | config |
> +       "Flush all caches. If a previous download failed this is often
> helpful"
> +       MCFileBasedRepository flushAllCaches.
> +       config := MCMcmUpdater updateFromDefaultRepository.
> +       config ifNil: [^self inform: 'Unable to retrieve updates from
> remote repository.' translated].
> +       config setSystemVersion.
> +       self inform: ('Update completed.
> + Current update number: ' translated, SystemVersion current
> highestUpdate).!
>
> Item was removed:
> - ----- Method: Utilities class>>setSystemVersionFromConfig: (in category
> 'fetching updates') -----
> - setSystemVersionFromConfig: anMCConfiguration
> -       "Set the current system version date to the latest date found in
> anMCConfiguration (or the associated working copy). Also set the highest
> update number to the sum of version numbers in the config."
> -
> -       | versionNumbers versionDates |
> -       versionNumbers := anMCConfiguration dependencies collect: [:d |
> -               (d versionInfo name copyAfterLast: $.) asInteger].
> -       versionDates := anMCConfiguration dependencies collect: [:d |
> -               d versionInfo date
> -                       ifNil: [d package workingCopy ancestors first
> date]].
> -       SystemVersion current
> -               date: versionDates max;
> -               highestUpdate: versionNumbers sum.
> - !
>
> Item was removed:
> - ----- Method: Utilities class>>updateFromServer (in category 'fetching
> updates') -----
> - updateFromServer
> -       "Update the image by loading all pending updates from the server."
> -       | config |
> -       "Flush all caches. If a previous download failed this is often
> helpful"
> -       MCFileBasedRepository flushAllCaches.
> -       config := MCMcmUpdater updateFromDefaultRepository.
> -       config ifNil: [^self inform: 'Unable to retrieve updates from
> remote repository.' translated].
> -       self setSystemVersionFromConfig: config.
> -       self inform: ('Update completed.
> - Current update number: ' translated, SystemVersion current
> highestUpdate).!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20131124/76fc0a7f/attachment.htm