should avoid to OBPAckage2Browser kind of name Stef
Begin forwarded message: > From: [email protected] > Date: September 28, 2009 6:34:25 PM GMT+02:00 > To: [email protected] > Subject: [squeak-dev] The Trunk: System-cwp.152.mcz > Reply-To: [email protected] > > Colin Putney uploaded a new version of System to project The Trunk: > http://source.squeak.org/trunk/System-cwp.152.mcz > > ==================== Summary ==================== > > Name: System-cwp.152 > Author: cwp > Time: 28 September 2009, 9:31:21 am > UUID: f3d14748-2ff3-408f-9ec5-6451f6b158f4 > Ancestors: System-dtl.151 > > AppRegistry now allows classes to decide how they will be displayed > in menus rather than always using the class name. > > =============== Diff against System-dtl.151 =============== > > Item was changed: > SystemOrganization addCategory: #'System-Applications'! > SystemOrganization addCategory: #'System-Change Notification'! > SystemOrganization addCategory: #'System-Changes'! > SystemOrganization addCategory: #'System-Digital Signatures'! > SystemOrganization addCategory: #'System-Digital Signatures-Tests'! > SystemOrganization addCategory: #'System-Download'! > SystemOrganization addCategory: #'System-FilePackage'! > SystemOrganization addCategory: #'System-FileRegistry'! > SystemOrganization addCategory: #'System-Finalization'! > SystemOrganization addCategory: #'System-Localization'! > SystemOrganization addCategory: #'System-Object Events'! > SystemOrganization addCategory: #'System-Object Events-Tests'! > SystemOrganization addCategory: #'System-Object Storage'! > SystemOrganization addCategory: #'System-Pools'! > - SystemOrganization addCategory: #'System-Serial Port'! > - SystemOrganization addCategory: #'System-Support'! > SystemOrganization addCategory: #'System-Preferences'! > + SystemOrganization addCategory: #'System-Serial Port'! > + SystemOrganization addCategory: #'System-Support'! > SystemOrganization addCategory: #'System-Support-Tests'! > SystemOrganization addCategory: #'System-Tools'! > > Item was changed: > ----- Method: AppRegistry class>>askForDefault (in category 'as yet > unclassified') ----- > askForDefault > > self registeredClasses isEmpty ifTrue: > [self inform: 'There are no ', self appName, ' applications > registered.'. > ^ default := nil]. > self registeredClasses size = 1 ifTrue: > [^ default := self registeredClasses anyOne]. > default := UIManager default > + chooseFrom: (self registeredClasses collect: [:ea | ea > nameForViewer]) > - chooseFrom: self registeredClasses > values: self registeredClasses > title: 'Which ', self appName, ' would you prefer?'. > default ifNil: [default := self registeredClasses first]. > ^default.! > > _______________________________________________ Pharo-project mailing list [email protected] http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project
