[Pkg] The Trunk: Tools-ct.1179.mcz

[commits at source.squeak.org]

Christoph Thiede uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-ct.1179.mcz

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

Name: Tools-ct.1179
Author: ct
Time: 25 November 2022, 6:21:36.545214 pm
UUID: db8819d6-e148-fc41-a0b5-5a2110920b4c
Ancestors: Tools-mt.1178

Adds drop-in-world support for messages and classes in change sorters.

=============== Diff against Tools-mt.1178 ===============

Item was changed:
  ----- Method: ChangeSorter>>buildClassListWith: (in category 'toolbuilder') -----
  buildClassListWith: builder
  
  	| listSpec |
  	listSpec := builder pluggableListSpec new.
  	listSpec 
  		model: self;
  		list: #classList; 
  		getSelected: #currentClassName; 
  		setSelected: #currentClassName:; 
  		menu: #classListMenu:shifted:; 
  		keyPress: #classListKey:from:;
+ 		dragItem: #dragClass:;
+ 		dragType: #dragTypeForClassListAt:.
- 		dragItem: #dragClass:.
  	^ listSpec!

Item was changed:
  ----- Method: ChangeSorter>>buildMessageListWith: (in category 'toolbuilder') -----
  buildMessageListWith: builder
  
  	| listSpec |
  	listSpec := builder pluggableListSpec new.
  	listSpec 
  		model: self;
  		list: #messageList; 
  		getSelected: #currentSelector;
  		setSelected: #currentSelector:; 
  		menu: #messageMenu:shifted:; 
  		keyPress: #messageListKey:from:;
+ 		dragItem: #dragMessage:;
+ 		dragType: #dragTypeForMessageListAt:.
- 		dragItem: #dragMessage:.
  	^ listSpec!

Item was added:
+ ----- Method: ChangeSorter>>dragTypeForClassListAt: (in category 'dragging') -----
+ dragTypeForClassListAt: index
+ 
+ 	^ #sourceCode!

Item was added:
+ ----- Method: ChangeSorter>>dragTypeForMessageListAt: (in category 'dragging') -----
+ dragTypeForMessageListAt: index
+ 
+ 	^ #sourceCode!