[squeak-dev] The Trunk: Morphic-dtl.516.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jan 19 23:47:42 UTC 2011


David T. Lewis uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-dtl.516.mcz

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

Name: Morphic-dtl.516
Author: dtl
Time: 19 January 2011, 6:46:15.252 pm
UUID: 248137ad-5329-4089-8597-81a5e07d22bd
Ancestors: Morphic-laza.515

Add SystemReporter as "About this System" entry in TheWorldMainDockingBar>>helpMenuOn: and revert #extendingTheSystem to prior version to remove SystemReporter loading instructions.

=============== Diff against Morphic-laza.515 ===============

Item was changed:
  ----- Method: TheWorldMainDockingBar class>>initialize (in category 'class initialization') -----
  initialize
+ 	"self initialize"
- 	" self initialize "
  	
  	Locale addLocalChangedListener: self.
  	self updateInstances.!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>extendingTheSystem (in category 'submenu - help') -----
  extendingTheSystem
  	^'"Note: Please edit this workspace and add your own contributions.
  To submit it to the inbox open the Monticello browser and submit it from there.
  Save the package ''* Morphic'' to the inbox."
  
  "Updating your system:
  The following will set the default update URL to receive development updates. 
  For developers and dare-devils only."
  
  MCMcmUpdater defaultUpdateURL: ''http://source.squeak.org/trunk''.
  
  "Installing new packages: 
  The following expression show how to load many interesting packages into Squeak."
  
- "Install and open a SystemReporter.
- You can use this information when sending out bug reports"
- (Installer ss project: ''SystemReporter'') install: ''SystemReporter''.
- (Smalltalk at: #SystemReporter) open.
- 
  "FFI: http://source.squeak.org/FFI.html"
  (Installer repository: ''http://source.squeak.org/FFI'')
  	install: ''FFI-Pools'';
  	install: ''FFI-Kernel'';
  	install: ''FFI-Tests'';
  	install: ''FFI-Win32'';
  	install: ''FFI-MacOS'';
  	install: ''FFI-Unix''.
  
  "OCompletion provides source code completion as you type"
  (Installer ss project: ''OCompletion'') install: ''Ocompletion''.
  (Smalltalk at: #ECToolSet) register.
  (Smalltalk at: #ToolSet) default: (Smalltalk at: #ECToolSet).
  
  "Omnibrowser, including Refactoring engine"
  (Installer ss project: ''MetacelloRepository'') install: ''ConfigurationOfOmniBrowser''.
  ((Smalltalk at: #ConfigurationOfOmniBrowser) project perform: #lastVersion) load: #( Dev ).
  
  "Seaside 2.8 http://www.seaside.st"
  (Installer ss project: ''MetacelloRepository'') install: ''ConfigurationOfSeaside28''.
  "WAKom startOn: 9090"
  
  "Seaside 2.8 Examples http://www.seaside.st"
  (Installer ss project: ''MetacelloRepository'') install: ''ConfigurationOfSeaside28Examples''.
  (Smalltalk at: #ConfigurationOfSeaside28Examples) load.
  
  "Seaside 3.0 http://www.seaside.st"
  (Installer ss project: ''MetacelloRepository'') install: ''ConfigurationOfSeaside30''.
  (Smalltalk at: #ConfigurationOfSeaside30) load.
  (Smalltalk at: #WAPharoServerAdaptorBrowser) open.
  
  "Pier CMS: http://www.piercms.com"
  (Installer ss project: ''MetacelloRepository'') install: ''ConfigurationOfPier2''.
  (Smalltalk at: #ConfigurationOfPier2) load.
  
  (Installer lukas project: ''pier2'') install: ''Pier-Blog''.
  (Installer lukas project: ''pier2'') install: ''Pier-Book''.
  (Installer lukas project: ''pier2addons'') install: ''Pier-Setup''.
  (Smalltalk at: #PRDistribution)  new register.
+ !!
+ ]style[(189 2 139 15 17 1 32 3 108 2 40 12 11 1 30 3 8 1 11 3 8 1 12 3 8 1 11 3 8 1 11 3 8 1 11 3 8 1 10 3 57 12 2 1 8 1 13 2 8 1 13 13 3 1 10 2 8 13 3 1 8 2 8 12 3 1 10 4 44 11 2 1 8 1 21 2 8 1 28 14 3 1 1 28 7 11 11 2 5 4 3 5 35 12 2 1 8 1 21 2 8 1 26 2 21 2 44 12 2 1 8 1 21 2 8 1 34 13 3 1 33 2 4 3 35 12 2 1 8 1 21 2 8 1 26 13 3 1 25 2 4 13 3 1 28 2 4 3 34 12 2 1 8 1 21 2 8 1 22 13 3 1 21 2 4 14 5 1 8 1 7 2 8 1 11 13 5 1 8 1 7 2 8 1 11 13 5 1 8 1 13 2 8 1 12 13 3 1 15 3 3 1 8 2)c000122122,cblack;,c000122122,cblack;,c000000122,cblack;,c122000122,cblack;,c000122122,cblack;,c000122122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000127127,cblack;,c000000127,cblack;,c000000127,cblack;,c127000127,cblack;,c000000127,cblack;,c127000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000000127,cblack;,c000122122,cblack;,c000000125,cblack;,c000000125,cblack;,c125000125,cblack;,c000000125,cblack;,c125000125,cblack;,c000000122,cblack;,c000000122,cblack;,c000000125,cblack;,c000000125,cblack;,c000000125,cblack;,c000000125,cblack;,c000122122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000122122,cblack;,c000122122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000122122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000122122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c122000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;,c000000122,cblack;!!' readStream nextChunkText!
- !!' readStream nextChunkText!

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 at 140 extent: 560 at 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 ].
+ 				(Smalltalk classNamed: #SystemReporter) ifNotNil: [:classSystemReporter |
+ 					menu addItem: [:item |
+ 						item
+ 							contents: 'About this System' translated;
+ 							help: 'SystemReporter status of the image and runtime environment' translated;
+ 							target: classSystemReporter;
+ 							selector: #open]].
  				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 at 140 extent: 560 at 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 |
  					(Smalltalk classNamed: #TerseGuideHelp) ifNotNil: [:classTerseGuideHelp |
  						menu addLine.
  						menu addItem: [:item |
  							item
  								contents: 'Terse Guide to Squeak' translated;
+ 								help: 'Concise information about language and environment' translated;
- 								help: 'concise information about language and environment' translated;
  								target: classHelpBrowser;
  								selector: #openOn:;
  								arguments: { classTerseGuideHelp }]].
  					menu addLine.
  					menu addItem: [:item |
  						item
  							contents: 'Help Browser' translated;
  							help: 'Integrated Help System' translated;
  							target: classHelpBrowser;
  							selector: #open]]]]!




More information about the Squeak-dev mailing list