diff options
-rw-r--r-- | src/corelib/x11/fpg_x11.pas | 2 |
1 files changed, 1 insertions, 1 deletions
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 |