The Trunk: Protocols-mt.69.mcz

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

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

Name: Protocols-mt.69
Author: mt
Time: 5 March 2020, 3:19:03.239454 pm
UUID: 5cb6cc36-2a3f-624f-a8e2-166a8ab135d6
Ancestors: Protocols-eem.68

Complete the "#classHierarchy -> #browseClassHierarchy" rename-method refactoring, which was started in 2018 for the ObjectExplorer.

=============== Diff against Protocols-eem.68 ===============

Item was changed:
  ----- Method: InstanceBrowser>>offerMenu (in category 'menu commands') -----
  offerMenu
  "Offer a menu to the user, in response to the hitting of the menu button on the tool pane"
 
  | aMenu |
  aMenu := MenuMorph new defaultTarget: self.
  aMenu title: 'Messages of ', objectViewed nameForViewer.
  aMenu addStayUpItem.
  aMenu addList: #(
  ('vocabulary...' chooseVocabulary)
  ('what to show...' offerWhatToShowMenu)
  -
  ('inst var refs (here)' setLocalInstVarRefs)
  ('inst var defs (here)' setLocalInstVarDefs)
  ('class var refs (here)' setLocalClassVarRefs)
  -
 
  ('navigate to a sender...' navigateToASender)
  ('recent...' navigateToRecentMethod)
  ('show methods in current change set'
  showMethodsInCurrentChangeSet)
  ('show methods with initials...'
  showMethodsWithInitials)
  -
  "('toggle search pane' toggleSearch)"
 
  -
  -
  ('browse full (b)' browseMethodFull)
+ ('browse hierarchy (h)' browseClassHierarchy)
- ('browse hierarchy (h)' classHierarchy)
  ('browse protocol (p)' browseFullProtocol)
  -
  ('fileOut' fileOutMessage)
  ('printOut' printOutMessage)
  -
  ('senders of... (n)' browseSendersOfMessages)
  ('implementors of... (m)' browseMessages)
  ('versions (v)' browseVersions)
  ('inheritance (i)' methodHierarchy)
  -
  ('references... (r)' browseVariableReferences)
  ('assignments... (a)' browseVariableAssignments)
  -
  ('viewer on me' viewViewee)
  ('inspector on me' inspectViewee)
  -
  ('more...' shiftedYellowButtonActivity)).
 
  aMenu popUpInWorld: ActiveWorld!

Item was changed:
  ----- Method: Lexicon>>offerMenu (in category 'menu commands') -----
  offerMenu
  "Offer a menu to the user, in response to the hitting of the menu button on the tool pane"
 
  | aMenu |
  aMenu := MenuMorph new defaultTarget: self.
  aMenu addTitle: 'Lexicon'.
  aMenu addStayUpItem.
  aMenu addList: #(
 
  ('vocabulary...' chooseVocabulary)
  ('what to show...' offerWhatToShowMenu)
  -
  ('inst var refs (here)' setLocalInstVarRefs)
  ('inst var assignments (here)' setLocalInstVarDefs)
  ('class var refs (here)' setLocalClassVarRefs)
  -
 
  ('navigate to a sender...' navigateToASender)
  ('recent...' navigateToRecentMethod)
  ('show methods in current change set'
  showMethodsInCurrentChangeSet)
  ('show methods with initials...'
  showMethodsWithInitials)
  -
  "('toggle search pane' toggleSearch)"
 
  -
  ('browse full (b)' browseMethodFull)
+ ('browse hierarchy (h)' browseClassHierarchy)
- ('browse hierarchy (h)' classHierarchy)
  ('browse protocol (p)' browseFullProtocol)
  -
  ('fileOut' fileOutMessage)
  ('printOut' printOutMessage)
  -
  ('senders of... (n)' browseSendersOfMessages)
  ('implementors of... (m)' browseMessages)
  ('versions (v)' browseVersions)
  ('inheritance (i)' methodHierarchy)
  -
  ('references... (r)' browseVariableReferences)
  ('assignments... (a)' browseVariableAssignments)
  -
  ('more...' shiftedYellowButtonActivity)).
 
  aMenu popUpInWorld: ActiveWorld!