[squeak-dev] The Trunk: PreferenceBrowser-ct.141.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Apr 2 16:38:57 UTC 2022
Christoph Thiede uploaded a new version of PreferenceBrowser to project The Trunk:
http://source.squeak.org/trunk/PreferenceBrowser-ct.141.mcz
==================== Summary ====================
Name: PreferenceBrowser-ct.141
Author: ct
Time: 2 April 2022, 6:38:32.234896 pm
UUID: 7edb9fb0-df4d-5748-9edc-70fb650d163a
Ancestors: PreferenceBrowser-mt.140
Fixes keyboard shortcuts cmd + c/C in preference browser.
=============== Diff against PreferenceBrowser-mt.140 ===============
Item was changed:
----- Method: PreferenceBrowserMorph>>keyPressedOn:event: (in category 'event handling') -----
keyPressedOn: aPreferenceView event: anEvent
anEvent commandKeyPressed
ifFalse: [
anEvent keyValue caseOf: {
[27] -> [aPreferenceView offerPreferenceNameMenu: self model].
[30] -> [self upKeyPressed: anEvent].
[31] -> [self downKeyPressed: anEvent].
[1] -> [self homeKeyPressed: anEvent].
[4] -> [self endKeyPressed: anEvent].
[11] -> [self pageUpKeyPressed: anEvent].
[12] -> [self pageDownKeyPressed: anEvent] }
otherwise: [self basicKeyPressed: anEvent].
^ self].
anEvent keyCharacter
caseOf: {
[$b] -> [self model findCategoryFromPreference: aPreferenceView preference].
+ [$c] -> [aPreferenceView preference copyName].
+ [$C] -> [aPreferenceView preference copyCode].
- [$c] -> [aPreferenceView copyName].
- [$C] -> [aPreferenceView copyCode].
[$i] -> [aPreferenceView preference inspect].
[$m] -> [aPreferenceView browse].
[$n] -> [aPreferenceView browseSenders]}
otherwise: [].!
More information about the Squeak-dev
mailing list
|