The Trunk: System-mt.1531.mcz

Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.1531.mcz

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

Name: System-mt.1531
Author: mt
Time: 5 August 2026, 1:58:07.946172 pm
UUID: 4f56f68b-24e9-1d4c-8297-d89afce22981
Ancestors: System-mt.1530

When loading your personal preferences from a file, make sure to mark the restored background (color) as custom to not reset it when switching UI themes.

Thanks to Tim (tpr) for the pointer!

=============== Diff against System-mt.1530 ===============

Item was changed:
  ----- Method: Preferences class>>loadPreferencesFrom: (in category 'initialization - save/load') -----
  loadPreferencesFrom: aFile
  
  	| stream params dict desktopColor patternsToIgnore |
  	patternsToIgnore := #('*updateMapName' '*defaultUpdateURL').
  	stream := ReferenceStream fileNamed: 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 rehash. "See http://lists.squeakfoundation.org/pipermail/squeak-dev/2021-December/217817.html"
  	dict keys
  		reject: [:key | patternsToIgnore anySatisfy: [:pattern | pattern match: key]]
  		thenDo: [:key | | value |
  			value := dict at: key.
  			(self preferenceAt: key ifAbsent: [nil]) ifNotNil:
  				[:pref | [pref preferenceValue: value preferenceValue]
  					on: Deprecation do: [ : err | "Ignore preferences which may not be supported anymore."]]].
  	params keysAndValuesDo: [ :key :value | self setParameter: key to: value ].
  	Smalltalk isMorphic
+ 		ifTrue: [ Project current setAsBackground: desktopColor ]
- 		ifTrue: [ Project current world fillStyle: desktopColor ]
  		ifFalse: [ self desktopColor: desktopColor. ScheduledControllers updateGray ]!

Squeak-dev mailing list -- [email protected]
To unsubscribe send an email to [email protected]