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

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

Name: Tools-mt.1029
Author: mt
Time: 4 March 2021, 3:38:36.350661 pm
UUID: bef0c471-6ff1-774d-860e-8958e1aa508b
Ancestors: Tools-mt.1028

Enable source-code dragging through a browser's message list to be dropped into the world to open a compact code editor.

Complements Tools-mt.1028, ToolBuilder-Kernel-mt.139, ToolBuilder-Morphic-mt.274, and Morphic-mt.1733.

=============== Diff against Tools-mt.1028 ===============

Item was changed:
  ----- Method: Browser>>buildMessageListWith: (in category 'toolbuilder') -----
  buildMessageListWith: builder
  	| listSpec |
  	listSpec := builder pluggableListSpec new.
  	listSpec 
  		model: self;
  		list: #messageList; 
  		getIndex: #messageListIndex; 
  		setIndex: #messageListIndex:; 
  		icon: #messageIconAt:;
  		helpItem: #messageHelpAt:;
  		menu: #messageListMenu:shifted:; 
  		keyPress: #messageListKey:from:.
+ 	SystemBrowser browseWithDragNDrop ifTrue: [
+ 		listSpec
+ 			dragItem: #dragFromMessageList:;
+ 			dragType: #dragTypeForMessageListAt:].
- 	SystemBrowser browseWithDragNDrop 
- 		ifTrue:[listSpec dragItem: #dragFromMessageList:].
  	^listSpec
  !

Item was added:
+ ----- Method: Browser>>dragTypeForMessageListAt: (in category 'drag and drop') -----
+ dragTypeForMessageListAt: index
+ 
+ 	^ #sourceCode!