diff options
Diffstat (limited to 'src/corelib/x11')
-rw-r--r-- | src/corelib/x11/fpg_x11.pas | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index 9510a182..2076b358 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -1703,7 +1703,8 @@ begin begin if Assigned(Drag) then begin - Drag.Dragging(ev); + if ((ev.xmotion.state and $FF00) shr 8) = MOUSE_LEFT then + Drag.Dragging(ev); end; if xapplication.TopModalForm <> nil then begin |