The Trunk: System-laza.312.mcz

Alexander Lazarević uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-laza.312.mcz

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

Name: System-laza.312
Author: laza
Time: 7 April 2010, 7:06:27.156 pm
UUID: 23d1d2cd-3a8d-48f6-8912-6bc02d3ade8e
Ancestors: System-laza.311

veryDeepCopy shouldn't be necessary

=============== Diff against System-laza.311 ===============

Item was changed:
  ----- Method: Preferences class>>storePreferencesIn: (in category 'personalization') -----
  storePreferencesIn: aFileName
  | stream prefsSnapshot |
  #(#Prevailing #PersonalPreferences )  do:[:ea | Parameters  removeKey:ea  ifAbsent:[]].
  stream := ReferenceStream fileNamed: aFileName.
  stream  nextPut:Parameters.
+ prefsSnapshot := self dictionaryOfPreferences copy.
- prefsSnapshot := self dictionaryOfPreferences veryDeepCopy.
  prefsSnapshot keysAndValuesDo: [:key :pref | prefsSnapshot at: key put: pref asPreference].
  stream  nextPut: prefsSnapshot.
  Smalltalk isMorphic
  ifTrue:[stream nextPut:World fillStyle]
  ifFalse:[stream nextPut:DesktopColor].
  stream close!