[squeak-dev] The Trunk: System-laza.312.mcz

Wed Apr 7 17:07:16 UTC 2010

Alexander Lazarevi&#263; 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!