[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