[Pkg] The Trunk: Morphic-mt.1223.mcz

commits at source.squeak.org commits at source.squeak.org
Tue Aug 2 12:29:11 UTC 2016


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

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

Name: Morphic-mt.1223
Author: mt
Time: 2 August 2016, 2:28:33.382941 pm
UUID: 5c873fc3-9395-c04d-9b4c-4036dfe8cd8c
Ancestors: Morphic-mt.1222

Sorry, the terse guide should not have vanished from the help menu.

=============== Diff against Morphic-mt.1222 ===============

Item was changed:
  ----- Method: TheWorldMainDockingBar>>helpMenuOn: (in category 'submenu - help') -----
  helpMenuOn: aDockingBar
  
  	aDockingBar addItem: [ :it |
  		it	contents: 'Help' translated;
  			addSubMenu: [ :menu | 
  				menu addItem: [:item |
  						item
  							contents: 'Squeak Help' translated;
  							help: 'Integrated Help System' translated;
  							target: self;
  							selector: #squeakHelp].
  				
  				menu addLine.
  				
  				menu addItem:[:item|
  					item
  						contents: 'Online Resources' translated;
  						help: 'Online resources for Squeak' translated;
  						target: self;
  						icon: MenuIcons smallHelpIcon;
  						selector: #squeakOnlineResources].
  				menu addItem:[:item|
  					item
  						contents: 'Keyboard Shortcuts' translated;
  						help: 'Keyboard bindings used in Squeak' translated;
  						target: self;
  						selector: #commandKeyHelp ].
  				menu addItem:[:item|
  					item
  						contents: 'Font Size Summary' translated;
  						help: 'Font size summary.' translated;
  						target: self;
  						selector: #fontSizeSummary ].
  				menu addItem:[:item|
  					item
  						contents: 'Useful Expressions' translated;
  						help: 'Useful expressions' translated;
  						target: self;
  						selector: #usefulExpressions ].
  				menu addLine.
  				menu addItem:[:item|
  					item
+ 						contents: 'Terse Guide to Squeak' translated;
+ 						help: 'Concise information about language and environment' translated;
+ 						target: self;
+ 						selector: #terseGuideToSqueak].
+ 				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: #extendingTheSystem].
  				menu addLine.
  				
  			menu addItem:[:item|
  				item
  					contents: 'Release Notes' translated;
  					help: 'Changes in this release' translated ;
  					target: self;
  					selector: #releaseNotes].
  			menu addItem:[:item|
  				item
  					contents: 'Working With Squeak' translated;
  					help: 'Information for new users' ;
  					target: self;
  					selector: #workingWithSqueak].
  			menu addItem:[:item|
  				item
  					contents: 'The Squeak User Interface' translated;
  					help: 'Descriptions of some of the more-unusual UI elements in Squeak' ;
  					target: self;
  					selector: #squeakUserInterface].
  			menu addItem:[:item|
  				item
  					contents: 'License Information' translated;
  					help: String empty ;
  					target: self;
  					selector: #licenseInformation].				
  				
  		
  			menu addLine.
  			menu addItem: [:item |
  				item
  					contents: 'About Squeak' translated;
  					help: 'SystemReporter status of the image and runtime environment' translated;
  					target: self;
  					selector: #aboutSqueak].
  		]]!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>openHelp:topic:styled: (in category 'submenu - help') -----
  openHelp: bookSymbol topic: topicSymbol styled: boolean
  
  	| openSelector |
+ 	openSelector := boolean ifTrue: [#openForCodeOn:] ifFalse: [#openOn:].
- 	openSelector := boolean ifTrue: [#openCodeOn:] ifFalse: [#openOn:].
  
  	(Smalltalk classNamed: 'HelpBrowser')
  		ifNil: [self inform: 'Sorry, there is no help system installed.' translated]
  		ifNotNil: [:helpClass |
  			(Smalltalk classNamed: bookSymbol)
  				ifNil: [self inform: 'Sorry, the help book you requested does not exist.']
  				ifNotNil: [:book |
  					topicSymbol
  						ifNil: [(helpClass perform: openSelector with: book) model showFirstTopic]
  						ifNotNil: [helpClass perform: openSelector with: (book perform: topicSymbol)]]]!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>terseGuideToSqueak (in category 'submenu - help') -----
  terseGuideToSqueak
  
  	self
  		openHelp: #TerseGuideHelp
  		topic: nil
+ 		styled: true.!
- 		styled: false.!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>usefulExpressions (in category 'submenu - help') -----
  usefulExpressions
  	
  	self
  		openHelp: #SqueakTutorials
  		topic: #usefulExpressions
+ 		styled: true.!
- 		styled: false.!



More information about the Packages mailing list