[squeak-dev] The Trunk: Monticello-eem.503.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Apr 16 20:54:21 UTC 2012


Eliot Miranda uploaded a new version of Monticello to project The Trunk:
http://source.squeak.org/trunk/Monticello-eem.503.mcz

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

Name: Monticello-eem.503
Author: eem
Time: 16 April 2012, 1:53:54.751 pm
UUID: 8687250d-8cb6-4d67-af24-28e7fd4f4d90
Ancestors: Monticello-eem.502

Provide a short-cut (cmd-shift-C) for copyReference.

=============== Diff against Monticello-eem.502 ===============

Item was changed:
  ----- Method: MCCodeTool>>methodListMenu: (in category 'menus') -----
  methodListMenu: aMenu
  	"Build the menu for the selected method, if any."
  	
  	self selectedMessageName
  	ifNil: [items notEmpty ifTrue:
  		[aMenu addList:#(('fileOut (o)'					fileOutMessage))]]
  	ifNotNil: [
  	aMenu addList:#(
  			('browse full (b)' 						browseMethodFull)
  			('browse hierarchy (h)'					classHierarchy)
  			('browse method (O)'					openSingleMessageBrowser)
  			('browse protocol (p)'					browseFullProtocol)
  			-
+ 			('fileOut (o)'								fileOutMessage)
- 			('fileOut (o)'							fileOutMessage)
  			('printOut'								printOutMessage)
  			('copy selector (c)'						copySelector)
+ 			('copy reference (C)'					copyReference)).
- 			('copy reference'					copyReference)).
  		aMenu addList: #(
  			-
  			('browse senders (n)'						browseSendersOfMessages)
  			('browse implementors (m)'					browseMessages)
  			('inheritance (i)'						methodHierarchy)
  			('versions (v)'							browseVersions)
  		('change sets with this method'			findMethodInChangeSets)
  "		('x revert to previous version'				revertToPreviousVersion)"
  		('remove from current change set'		removeFromCurrentChanges)
  "		('x revert & remove from changes'		revertAndForget)"
  		('add to current change set'				adoptMessageInCurrentChangeset)
  "		('x copy up or copy down...'				copyUpOrCopyDown)"
  "		('x remove method (x)'					removeMessage)"
  		"-"
  		).
  	].
  "	aMenu addList: #(
  			('x inst var refs...'						browseInstVarRefs)
  			('x inst var defs...'						browseInstVarDefs)
  			('x class var refs...'						browseClassVarRefs)
  			('x class variables'						browseClassVariables)
  			('x class refs (N)'							browseClassRefs)
  	).
  "
  	^ aMenu
  !



More information about the Squeak-dev mailing list