Michael Haupt uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-mha.479.mcz ==================== Summary ==================== Name: Morphic-mha.479 Author: mha Time: 2 December 2010, 10:59:00.13 am UUID: 7118fdf5-bf71-4cc9-b11d-a4284515f94a Ancestors: Morphic-cmm.478 reorganised help menu: * removed terse guide from welcome workspaces * added entry for HelpBrowser version of terse guide =============== Diff against Morphic-cmm.478 =============== Item was changed: ----- Method: TheWorldMainDockingBar>>helpMenuOn: (in category 'submenu - help') ----- helpMenuOn: aDockingBar aDockingBar addItem: [ :it | it contents: 'Help' translated; addSubMenu: [ :menu | 'Todo'. menu addItem:[:item| item contents: 'Online Resources' translated; help: 'Online resources for Squeak' translated; target: self; icon: MenuIcons smallHelpIcon; selector: #showWelcomeText:label:in:; arguments: { #squeakOnlineResources. 'Squeak Online Resources'. (140@140 extent: 560@360) }]. menu addItem:[:item| item contents: 'Keyboard Shortcuts' translated; help: 'Keyboard bindings used in Squeak' translated; target: Utilities; selector: #openCommandKeyHelp ]. menu addItem:[:item| item contents: 'Font Size Summary' translated; help: 'Font size summary from the old Squeak 3.10.2 help menu.' translated; target: TextStyle; selector: #fontSizeSummary ]. menu addItem:[:item| item contents: 'Useful Expressions' translated; help: 'Useful expressions from the old Squeak 3.10.2 help menu.' translated; target: Utilities; selector: #openStandardWorkspace ]. menu addLine. menu addItem:[:item| item contents: 'Extending the system' translated; help: 'Includes code snippets to evaluate for extending the system' translated; target: self; icon: MenuIcons smallHelpIcon; selector: #showWelcomeText:label:in:; arguments: { #extendingTheSystem. 'How to extend the system'. (140@140 extent: 560@360) }]. menu addLine. menu addItem:[:item| item contents: 'Welcome Workspaces' translated; help: 'The Welcome Workspaces' translated; addSubMenu:[:submenu| self welcomeWorkspacesOn: submenu]]. (Smalltalk classNamed: #HelpBrowser) ifNotNil: [:classHelpBrowser| menu addLine. menu addItem: [ :item | item + contents: 'Terse Guide to Squeak' translated; + help: 'concise information about language and environment' translated; + target: classHelpBrowser; + selector: #openOn:; + arguments: { TerseGuideHelp } ]. + menu addLine. + menu addItem: [ :item | + item contents: 'Help Browser' translated; help: 'Integrated Help System' translated; target: classHelpBrowser; selector: #open ] ]. ]].! Item was removed: - ----- Method: TheWorldMainDockingBar>>terseGuideToSqueak (in category 'submenu - help') ----- (excessive size, no diff calculated) Item was changed: ----- Method: TheWorldMainDockingBar>>welcomeWorkspacesOn: (in category 'submenu - help') ----- welcomeWorkspacesOn: menu menu addItem:[:item| item contents: 'Welcome to Squeak 4.2' translated; help: 'A Welcome Workspace' translated; target: self; selector: #showWelcomeText:label:in:; arguments: { #welcomeToSqueak42. 'Welcome to Squeak 4.2'. (140@140 extent: 500@300) }]. menu addItem:[:item| item contents: 'The Squeak User Interface' translated; help: 'A Welcome Workspace' translated; target: self; selector: #showWelcomeText:label:in:; arguments: { #squeakUserInterface. 'The Squeak User Interface'. (160@160 extent: 500@300) }]. menu addItem:[:item| item contents: 'Working With Squeak' translated; help: 'A Welcome Workspace' translated; target: self; selector: #showWelcomeText:label:in:; arguments: { #workingWithSqueak. 'Working With Squeak'. (180@180 extent: 500@300) }]. menu addItem:[:item| item - contents: 'Terse Guide to Squeak' translated; - help: 'A Welcome Workspace' translated; - target: self; - selector: #showWelcomeText:label:in:; - arguments: { - #terseGuideToSqueak. - 'Terse Guide to Squeak'. - (180@180 extent: 600@400) - }]. - menu addItem:[:item| - item contents: 'License Information' translated; help: 'A Welcome Workspace' translated; target: self; selector: #showWelcomeText:label:in:; arguments: { #licenseInformation. 'License Information'. (200@200 extent: 500@300) }].! |
Free forum by Nabble | Edit this page |