diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-03-01 11:22:19 +0200 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2010-03-01 11:22:19 +0200 |
| commit | fc6bf7220ae20d3f1b6329751abef036d8db1325 (patch) | |
| tree | b8f566e976179db1594b54a90152998448baf80b /src/corelib/x11 | |
| parent | e5e651778ea8805e03c69adacbca099e9b5ef8b7 (diff) | |
| download | fpGUI-fc6bf7220ae20d3f1b6329751abef036d8db1325.tar.xz | |
X11: Fix crash when copy-to-clipboard under 64bit Linux.
Diffstat (limited to 'src/corelib/x11')
| -rw-r--r-- | src/corelib/x11/fpg_x11.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index 8d0fcb21..054f71c0 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -535,7 +535,7 @@ begin e._type := SelectionNotify; e.requestor := ev.xselectionrequest.requestor; e.selection := ev.xselectionrequest.selection; - e.selection := xapplication.xia_clipboard; +// e.selection := xapplication.xia_clipboard; e.target := ev.xselectionrequest.target; e.time := ev.xselectionrequest.time; e._property := ev.xselectionrequest._property; @@ -544,7 +544,7 @@ begin begin a := XA_STRING; XChangeProperty(xapplication.Display, e.requestor, e._property, - XA_ATOM, sizeof(TAtom)*8, 0, PByte(@a), sizeof(TAtom)); + XA_ATOM, 32, PropModeReplace, PByte(@a), Sizeof(TAtom)); // I think last parameter is right? end else begin |