Fixed implementors of #transferFrom:event: that no longer added #shou…

…ldCopy from the TransferMorph to the SpDragAndDropTransfer (added in commit 0c0d08a but removed in commit 4abd4fa).
pharo-spec · Nov 29, 2024 · c4c440e · c4c440e
1 parent 8132c2e
commit c4c440e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 0 deletions.
diff --git a/src/Spec2-Adapters-Morphic/SpMorphicTableAdapter.class.st b/src/Spec2-Adapters-Morphic/SpMorphicTableAdapter.class.st
@@ -271,6 +271,7 @@ SpMorphicTableAdapter >> transferFrom: aTransferMorph event: anEvent [
 	rowAndColumn := self widget container rowAndColumnIndexContainingPoint: anEvent position.
 	^ SpDragAndDropTransferToTable new
 		passenger: aTransferMorph passenger;
+		shouldCopy: aTransferMorph shouldCopy;
 		row: (rowAndColumn first ifNil: [ 0 ]);
 		column: (rowAndColumn second ifNil: [ 0 ]);
 		yourself

diff --git a/src/Spec2-Adapters-Morphic/SpMorphicTreeTableAdapter.class.st b/src/Spec2-Adapters-Morphic/SpMorphicTreeTableAdapter.class.st
@@ -493,6 +493,7 @@ SpMorphicTreeTableAdapter >> transferFrom: aTransferMorph event: anEvent [
 	^ SpDragAndDropTransferToTree new
 		passenger: aTransferMorph passenger;
 		row: (rowAndColumn first ifNil: [ 0 ]);
+		shouldCopy: aTransferMorph shouldCopy;
 		column: (rowAndColumn second ifNil: [ 0 ]);
 		target: aTarget;
 		yourself