[squeak-dev] The Trunk: 60Deprecated-mt.79.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Jul 13 09:49:45 UTC 2020


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

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

Name: 60Deprecated-mt.79
Author: mt
Time: 13 July 2020, 11:49:44.479623 am
UUID: 2481d272-5ff4-1f45-a526-3cfcf05bf11e
Ancestors: 60Deprecated-mt.78

Complements ST80-mt.256

=============== Diff against 60Deprecated-mt.78 ===============

Item was changed:
  ----- Method: StandardFileMenu>>makeFileMenuFor: (in category 'menu building') -----
  makeFileMenuFor: aDirectory
  "Initialize an instance of me to operate on aDirectory"
  
  	| theMenu |
  	pattern ifNil: [pattern := {'*'}].
  	Cursor wait showWhile: 
  		[self 
  			labels: 	(self menuLabelsString: aDirectory)
+ 			font: 	Preferences standardMenuFont 
- 			font: 	(MenuStyle fontAt: 1) 
  			lines: 	(self menuLinesArray: aDirectory).
  		theMenu := self selections: (self menuSelectionsArray: aDirectory)].
  	^theMenu!



More information about the Squeak-dev mailing list