[squeak-dev] The Trunk: System.spur-kfr.725.mcz

karl ramberg karlramberg at gmail.com
Tue Apr 28 06:55:42 UTC 2015


Ok,
Can someone remove System.spur-kfr.725.mcz ?

Karl

On Tue, Apr 28, 2015 at 8:36 AM, karl ramberg <karlramberg at gmail.com> wrote:

> Dang.
> What is the procedure for getting this right again ?
>
> Karl
>
> On Tue, Apr 28, 2015 at 8:28 AM, Levente Uzonyi <leves at elte.hu> wrote:
>
>> Why is this a spur-only commit? I guess this will break the update
>> mechanism.
>>
>> Levente
>>
>>
>> On Tue, 28 Apr 2015, commits at source.squeak.org wrote:
>>
>>  Karl Ramberg uploaded a new version of System to project The Trunk:
>>> http://source.squeak.org/trunk/System.spur-kfr.725.mcz
>>>
>>> ==================== Summary ====================
>>>
>>> Name: System.spur-kfr.725
>>> Author: kfr
>>> Time: 28 April 2015, 7:31:43.891 am
>>> UUID: 56df7b80-d8e2-9945-8286-501a5fff02a4
>>> Ancestors: System.spur-eem.709, System.spur-eem.712,
>>> System.spur-topa.718, System.spur-mt.724
>>>
>>> Register fileService for *.pref. Preferences can now be loaded from
>>> FileList
>>>
>>> =============== Diff against System.spur-eem.709 ===============
>>>
>>> Item was added:
>>> + ----- Method: Preferences class>>fileReaderServicesForFile:suffix: (in
>>> category 'file list services') -----
>>> + fileReaderServicesForFile: fullName suffix: suffix
>>> +       ^(suffix = 'prefs')  | (suffix = '*')
>>> +               ifTrue: [ self services ]
>>> +               ifFalse: [ #() ]!
>>>
>>> Item was changed:
>>>  ----- Method: Preferences class>>loadPreferencesFrom: (in category
>>> 'personalization') -----
>>>  loadPreferencesFrom: aFile
>>>         | stream params dict desktopColor |
>>> +       stream := ReferenceStream fileNamed: aFile.
>>> -       stream := ReferenceStream on: aFile.
>>>         params := stream next.
>>>         self assert: (params isKindOf: IdentityDictionary).
>>>         params removeKey: #PersonalDictionaryOfPreferences.
>>>         dict := stream next.
>>>         self assert: (dict isKindOf: IdentityDictionary).
>>>         desktopColor := stream next.
>>>         stream close.
>>>         dict keysAndValuesDo:
>>>                 [:key :value | (self preferenceAt: key ifAbsent: [nil])
>>> ifNotNil:
>>>                         [:pref | pref preferenceValue: value
>>> preferenceValue]].
>>>
>>>         params keysAndValuesDo: [ :key :value | self setParameter: key
>>> to: value ].
>>>
>>>         Smalltalk isMorphic
>>>                 ifTrue: [ World fillStyle: desktopColor ]
>>>                 ifFalse: [ self desktopColor: desktopColor.
>>> ScheduledControllers updateGray ].
>>>  !
>>>
>>> Item was added:
>>> + ----- Method: Preferences class>>serviceLoadPreferencesFromDisk (in
>>> category 'file list services') -----
>>> + serviceLoadPreferencesFromDisk
>>> +       ^ SimpleServiceEntry
>>> +               provider: self
>>> +               label: 'load preferences from a saved file'
>>> +               selector: #restorePreferencesFromDisk:
>>> +               description: 'restore all saved personal preference
>>> settings'
>>> +               buttonLabel: 'load preferences'!
>>>
>>> Item was added:
>>> + ----- Method: Preferences class>>services (in category 'file list
>>> services') -----
>>> + services
>>> +       ^ Array with: self serviceLoadPreferencesFromDisk!
>>>
>>>
>>>
>>>
>>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20150428/040c9337/attachment.htm


More information about the Squeak-dev mailing list