diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2012-10-25 15:40:04 +0100 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2012-10-25 15:40:04 +0100 |
commit | 3093cb581763e272c88cb278cbdebfc64740cb1f (patch) | |
tree | 071d3acdd162e04a7b745a5c35bb08c28505c2bb /src/corelib/x11 | |
parent | c946ff5b0d593ace2c00a04725137646232cdffa (diff) | |
download | fpGUI-3093cb581763e272c88cb278cbdebfc64740cb1f.tar.xz |
Adds missing clearing of record structure before use.
The XLib man pages clearly state that the TXEvent structure must be cleared to 0 values
before use.
Diffstat (limited to 'src/corelib/x11')
-rw-r--r-- | src/corelib/x11/fpg_x11.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index 39eaffe7..4211dd19 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -3547,6 +3547,8 @@ var begin if FDropAccepted then begin + FillChar(xev, SizeOf(TXEvent), 0); + xev.xany._type := X.ClientMessage; xev.xany.display := xapplication.Display; xev.xclient.window := FLastTarget; |