From 5828b663bd951bfde2a1fa63d0dafcf6a023cbb9 Mon Sep 17 00:00:00 2001
From: Hagbard-Celin <30884074+Hagbard-Celin@users.noreply.github.com>
Date: Mon, 30 Oct 2023 06:51:42 +0100
Subject: [PATCH] Fix memlaek on non-icon drag in drag_routines.c with custom
 dragging enabled

I just mirrored part of what was done in commit b0799cd. This seems to work after a quick test.
---
 source/Library/drag_routines.c | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/source/Library/drag_routines.c b/source/Library/drag_routines.c
index 903369c..ee77e99 100644
--- a/source/Library/drag_routines.c
+++ b/source/Library/drag_routines.c
@@ -585,7 +585,14 @@ void LIBFUNC L_AddDragImage(REG(a0, DragInfo *drag))
 	// If bob not visible, add to list
 	if (!(drag->flags & DRAGF_VALID))
 	{
-		AddBob(&drag->bob, drag->rastport);
+		if (!(drag->flags&DRAGF_CUSTOM))
+        	{
+        		AddBob(&drag->bob,drag->rastport);
+        	}
+        	else
+		{
+			AddVSprite(&drag->sprite, drag->rastport);
+		}  
 		drag->flags |= DRAGF_VALID;
 	}
 }