A new version of Tools was added to project The Inbox: http://source.squeak.org/inbox/Tools-cbc.766.mcz
==================== Summary ====================
Name: Tools-cbc.766 Author: cbc Time: 15 September 2017, 1:32:51.722459 pm UUID: 7fd4bc5e-35b0-954e-91f3-a1cd65adee00 Ancestors: Tools-eem.765
For Explorers, add a menu item 'Copy value' (similar to Copy name) that copies the value of the selected item, suitable for use elsewhere.
=============== Diff against Tools-eem.765 ===============
Item was added: + ----- Method: ObjectExplorer>>copyValue (in category 'menus - actions') ----- + copyValue + "Copy the name of the current variable, so the user can paste it into the window below and work with is." + + Clipboard clipboardText: self currentSelection value. !
Item was changed: ----- Method: ObjectExplorer>>mainTreeListMenu: (in category 'menus') ----- mainTreeListMenu: aMenu <treeListMenu>
aMenu addStayUpItemSpecial.
aMenu addList: #( ('inspect (i)' inspectSelection) ('explore (I)' exploreSelection) - ('method refs to this inst var' referencesToSelection) ('methods storing into this inst var' defsOfSelection) ('objects pointing to this value' objectReferencesToSelection) ('chase pointers' chasePointersForSelection) ('explore pointers' explorePointersForSelection) - ('browse full (b)' browseFull) ('browse class' browseClass) ('browse hierarchy (h)' classHierarchy) ('browse protocol (p)' browseFullProtocol) - ('references... (r)' browseVariableReferences) ('assignments... (a)' browseVariableAssignments) ('class refs (N)' browseClassRefs) - ('copy name (c)' copyName) + ('copy value' copyValue) ('basic inspect' inspectBasic)).
Smalltalk isMorphic ifTrue: [ aMenu addList: #( - ('viewer for this value (v)' viewerForValue))].
aMenu addList: #( - ('monitor changes' monitorSelection)). monitorList isEmptyOrNil ifFalse: [ aMenu addList: #( ('stop monitoring all' stopMonitoring))]. ^ aMenu!