summaryrefslogtreecommitdiff
path: root/gfx/x11/gfx_x11.pas
diff options
context:
space:
mode:
Diffstat (limited to 'gfx/x11/gfx_x11.pas')
-rw-r--r--gfx/x11/gfx_x11.pas8
1 files changed, 6 insertions, 2 deletions
diff --git a/gfx/x11/gfx_x11.pas b/gfx/x11/gfx_x11.pas
index d825c78f..f49228cb 100644
--- a/gfx/x11/gfx_x11.pas
+++ b/gfx/x11/gfx_x11.pas
@@ -1663,11 +1663,15 @@ begin
end;
etMouseWheel:
begin
-
+ // it's handled in etMousePressed
end;
etPaint:
begin
- if Assigned(OnPaint) then OnPaint(Self, Rect(AEvent.X, AEvent.Y, AEvent.Width, AEvent.Height));
+// if Assigned(OnPaint) then OnPaint(Self, Rect(AEvent.X, AEvent.Y, AEvent.Width, AEvent.Height));
+ // We are ignoring the rectangle from the XEvent and rather use the
+ // full window rectangle.
+ if Assigned(OnPaint) then
+ OnPaint(Self, Rect(0, 0, Width, Height));
end;
etMove:
begin