Tracing (drop effect)

Source commit: f92a2eb2fc0a1025be3c898c4d2d85300f3306b0

source/packages/filemng/DirView.pas

@@ -3094,13 +3094,15 @@ begin
       dwEffect := DropEffect_Link
     end
       else
-    if DragOnDriveIsMove and
-       (not DDOwnerIsSource or Assigned(DropTarget)) and
-       (((DragDrive = Upcase(Path[1])) and (dwEffect = DropEffect_Copy) and
-       (DragDropFilesEx.AvailableDropEffects and DropEffect_Move <> 0))
-         or IsRecycleBin) then
     begin
-      dwEffect := DropEffect_Move;
+      if DragOnDriveIsMove and
+         (not DDOwnerIsSource or Assigned(DropTarget)) and
+         (((DragDrive = Upcase(Path[1])) and (dwEffect = DropEffect_Copy) and
+         (DragDropFilesEx.AvailableDropEffects and DropEffect_Move <> 0))
+           or IsRecycleBin) then
+      begin
+        dwEffect := DropEffect_Move;
+      end;
     end;
   end;