[Pkg] The Trunk: Tools-kks.845.mcz

commits at source.squeak.org commits at source.squeak.org
Sat Mar 16 18:44:55 UTC 2019


Eliot Miranda uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-kks.845.mcz

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

Name: Tools-kks.845
Author: kks
Time: 11 March 2019, 4:28:38.697611 pm
UUID: f95a6695-03f2-4dfc-a80b-e8bc6df8b6ce
Ancestors: Tools-pre.844

Simplify addItem in Model: to open a method browser directly on the specified class and method. This should make creating hotlinks for method references in workspaces and help text.

=============== Diff against Tools-pre.844 ===============

Item was changed:
  ----- Method: Model>>addItem: (in category '*Tools') -----
  addItem: classAndMethod
+ 	"Open a browser directly on the given class and method
- 	"Make a linked message list and put this method in it"
  	
+ 	Model new addItem: 'Model addItem:'
+ 	Model new addItem: 'Model>>addItem:'
+ 	"
+ 	
- 
  	self flag: #mref.	"classAndMethod is a String"
- 
  	MessageSet 
  		parse: classAndMethod  
+ 		toClassAndSelector: [ :class :sel |
- 		toClassAndSelector: [ :class :sel | | list |
  			class ifNil: [^self].
+ 			Browser newOnClass: class selector: sel
- 			list := OrderedCollection with: (
- 				MethodReference new
- 					setClass: class  
- 					methodSymbol: sel 
- 					stringVersion: classAndMethod
- 			).
- 			ToolSet 
- 				browseMessageSet: list 
- 				name: 'Linked by HyperText'
- 				autoSelect: nil
  		]
  
  !



More information about the Packages mailing list