Bert Freudenberg uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-bf.806.mcz==================== Summary ====================
Name: System-bf.806
Author: bf
Time: 16 March 2016, 11:09:37.866243 am
UUID: 017e0ba9-ac48-49e9-9959-2c8cabf65abe
Ancestors: System-eem.805
Make senders of preference change messages findable. With this change, the only sender of e.g. swapMouseButtonsChanged will be found.
Needs Kernel-bf.1006 to actually work.
=============== Diff against System-eem.805 ===============
Item was added:
+ ----- Method: Preference class>>isChangeSelector: (in category 'browsing support') -----
+ isChangeSelector: aLiteral
+ ^Preferences isChangeSelector: aLiteral!
Item was added:
+ ----- Method: Preference>>changeSelector (in category 'accessing') -----
+ changeSelector
+ ^changeSelector!
Item was changed:
----- Method: Preference>>notifyInformeeOfChange (in category 'change notification') -----
notifyInformeeOfChange
"If there is a changeInformee, notify her that I have changed value"
+
+ <hasLiteralTest: #isChangeSelector:>
+ "To find this method as sender of all changeSelectors"
changeInformee ifNotNil: [changeInformee perform: changeSelector]!
Item was added:
+ ----- Method: Preferences class>>isChangeSelector: (in category 'reacting to change') -----
+ isChangeSelector: aLiteral
+ ^preferencesDictionary anySatisfy: [:pref |
+ aLiteral = pref changeSelector]!