From f97be77054ec360f41cefb9a0b3193415a0c4b43 Mon Sep 17 00:00:00 2001
From: Graeme Geldenhuys <graemeg@gmail.com>
Date: Tue, 14 Sep 2010 23:02:36 +0200
Subject: Fixed double free libc crash. We assumed we should always free
 xdndtypes.

NEVER ASSUME!
---
 src/corelib/x11/fpg_x11.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas
index 405e4264..a16d0ede 100644
--- a/src/corelib/x11/fpg_x11.pas
+++ b/src/corelib/x11/fpg_x11.pas
@@ -868,7 +868,7 @@ begin
       FDNDTypeList.Add(itm);
     end;
   end;
-  if xdndtypes <> nil then
+  if count > 3 then
     XFree(xdndtypes);
 
   for i := 0 to FDNDTypeList.Count-1 do
-- 
cgit v1.2.3-70-g09d2